/ MACD 5 / MACD 5.bin / workbench / time / talking_clock / tclock

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 03 f3 00 00 00 00 | 00 00 00 02 00 00 00 00 |........|........|
|00000010| 00 00 00 01 00 00 00 6f | 00 00 0b 03 00 00 03 e9 |.......o|........|
|00000020| 00 00 00 6f 48 e7 3f 3e | 24 00 26 48 28 4f 20 02 |...oH.?>|$.&H(O .|
|00000030| 5e 40 02 80 ff ff ff fe | 9f c0 24 4f 22 4a 20 0b |^@......|..$O"J .|
|00000040| 67 20 70 20 72 09 74 0a | 16 1b 67 16 b6 02 67 12 |g p r.t.|..g...g.|
|00000050| b6 00 67 f4 b6 01 67 f0 | 12 c3 16 1b 67 04 b6 02 |..g...g.|....g...|
|00000060| 66 f6 42 11 b5 c9 67 08 | b0 21 67 f6 b2 11 67 f2 |f.B...g.|.!g...g.|
|00000070| 7e 14 2c 78 00 04 61 00 | 00 de 4a 80 67 00 00 aa |~.,x..a.|..J.g...|
|00000080| 2a 40 43 f9 00 00 01 1a | 4e ae fe 7a 4a 80 67 00 |*@C.....|N..zJ.g.|
|00000090| 00 92 43 f9 00 00 01 1f | 70 00 4e ae fd d8 4a 80 |..C.....|p.N...J.|
|000000a0| 67 00 00 80 2c 00 cd 8e | 20 4d 93 c9 70 00 4e ae |g...,...| M..p.N.|
|000000b0| ff 70 67 68 26 48 27 7c | 00 00 00 00 00 28 27 4a |.pgh&H'||.....('J|
|000000c0| 00 2c 70 02 72 00 4e ae | ff 5e 67 46 cd 8e 27 7c |.,p.r.N.|.^gF..'||
|000000d0| 02 04 00 01 00 1c 4e ae | ff 7c 43 f9 00 00 01 1a |......N.|.|C.....|
|000000e0| 4e ae fe 7a 2a 00 67 08 | 20 40 22 4b 4e ae fe 92 |N..z*.g.| @"KN...|
|000000f0| 4e ae ff 76 4a 85 67 0e | 20 4d 4e ae fe 80 20 4d |N..vJ.g.| MN... M|
|00000100| 4e ae fe 8c 7e 00 cd 8e | 20 4b 70 02 4e ae ff 64 |N...~...| Kp.N..d|
|00000110| cd 8e cd 8e 20 4b 4e ae | ff 6a cd 8e 22 46 4e ae |.... KN.|.j.."FN.|
|00000120| fe 62 20 4d 61 00 00 8c | 20 07 2e 4c 4c df 7c fc |.b Ma...| ..LL.|.|
|00000130| 4e 75 00 00 00 00 00 00 | 00 00 00 00 00 00 52 45 |Nu......|......RE|
|00000140| 58 58 00 72 65 78 78 73 | 79 73 6c 69 62 2e 6c 69 |XX.rexxs|yslib.li|
|00000150| 62 72 61 72 79 00 48 e7 | 20 22 2c 78 00 04 70 ff |brary.H.| ",x..p.|
|00000160| 4e ae fe b6 74 ff b4 00 | 67 40 24 00 70 22 22 3c |N...t...|g@$.p""<|
|00000170| 00 01 00 01 4e ae ff 3a | 4a 80 67 28 24 40 15 7c |....N..:|J.g($@.||
|00000180| 00 04 00 08 15 42 00 0f | 93 c9 4e ae fe da 25 40 |.....B..|..N...%@|
|00000190| 00 10 41 ea 00 14 25 48 | 00 1c 43 ea 00 18 20 89 |..A...%H|..C... .|
|000001a0| 20 0a 60 08 20 02 4e ae | fe b0 70 00 4c df 44 04 | .`. .N.|..p.L.D.|
|000001b0| 4e 75 48 e7 00 22 24 48 | 2c 78 00 04 70 ff 15 40 |NuH.."$H|,x..p..@|
|000001c0| 00 08 25 40 00 14 70 00 | 10 2a 00 0f 4e ae fe b0 |..%@..p.|.*..N...|
|000001d0| 22 4a 70 22 4e ae ff 2e | 4c df 44 00 4e 75 00 00 |"Jp"N...|L.D.Nu..|
|000001e0| 00 00 03 ec 00 00 00 03 | 00 00 00 00 00 00 00 60 |........|.......`|
|000001f0| 00 00 00 70 00 00 00 b8 | 00 00 00 01 00 00 00 01 |...p....|........|
|00000200| 00 00 00 94 00 00 00 00 | 00 00 03 f2 00 00 03 ea |........|........|
|00000210| 00 00 0b 03 2f 2a 20 43 | 6f 6d 70 72 65 73 73 65 |..../* C|ompresse|
|00000220| 64 20 77 69 74 68 20 43 | 6f 6d 70 72 65 73 73 52 |d with C|ompressR|
|00000230| 65 78 78 20 76 32 2e 31 | 2c 20 28 43 29 20 31 39 |exx v2.1|, (C) 19|
|00000240| 39 33 2d 39 36 20 52 6f | 62 65 72 74 20 48 6f 66 |93-96 Ro|bert Hof|
|00000250| 6d 61 6e 6e 20 2a 2f 0a | 4f 50 54 49 4f 4e 53 20 |mann */.|OPTIONS |
|00000260| 52 45 53 55 4c 54 53 3b | 49 54 41 4c 49 43 3d 27 |RESULTS;|ITALIC='|
|00000270| 39 62 27 78 7c 7c 27 33 | 33 27 78 7c 7c 27 36 64 |9b'x||'3|3'x||'6d|
|00000280| 27 78 3b 50 4c 41 49 4e | 3d 27 39 62 27 78 7c 7c |'x;PLAIN|='9b'x|||
|00000290| 27 33 30 27 78 7c 7c 27 | 36 64 27 78 3b 42 4f 4c |'30'x||'|6d'x;BOL|
|000002a0| 44 3d 27 39 62 27 78 7c | 7c 27 33 31 27 78 7c 7c |D='9b'x|||'31'x|||
|000002b0| 27 36 64 27 78 3b 57 48 | 49 54 45 3d 27 39 62 27 |'6d'x;WH|ITE='9b'|
|000002c0| 78 7c 7c 27 33 32 27 78 | 7c 7c 27 36 64 27 78 3b |x||'32'x|||'6d'x;|
|000002d0| 55 4e 44 45 52 3d 27 39 | 62 27 78 7c 7c 27 33 34 |UNDER='9|b'x||'34|
|000002e0| 27 78 7c 7c 27 36 64 27 | 78 3b 53 51 3d 22 27 22 |'x||'6d'|x;SQ="'"|
|000002f0| 3b 44 51 3d 27 22 27 3b | 41 41 3d 27 31 64 65 34 |;DQ='"';|AA='1de4|
|00000300| 27 78 3b 41 42 3d 27 31 | 64 65 30 27 78 3b 4f 41 |'x;AB='1|de0'x;OA|
|00000310| 3d 27 31 64 66 36 27 78 | 3b 45 45 3d 27 31 64 65 |='1df6'x|;EE='1de|
|00000320| 38 27 78 3b 50 41 52 53 | 45 20 41 52 47 20 43 4d |8'x;PARS|E ARG CM|
|00000330| 44 27 20 27 42 49 54 3b | 49 46 20 75 70 70 65 72 |D' 'BIT;|IF upper|
|00000340| 28 42 49 54 29 20 3d 20 | 27 27 20 54 48 45 4e 20 |(BIT) = |'' THEN |
|00000350| 44 4f 3b 49 46 20 75 70 | 70 65 72 28 43 4d 44 29 |DO;IF up|per(CMD)|
|00000360| 20 3d 20 27 41 42 4f 55 | 54 27 20 54 48 45 4e 20 | = 'ABOU|T' THEN |
|00000370| 44 4f 3b 53 69 67 6e 61 | 6c 20 41 42 4f 55 54 3b |DO;Signa|l ABOUT;|
|00000380| 45 4e 44 3b 49 46 20 75 | 70 70 65 72 28 43 4d 44 |END;IF u|pper(CMD|
|00000390| 29 20 3d 20 27 45 4e 47 | 4c 49 53 48 27 20 54 48 |) = 'ENG|LISH' TH|
|000003a0| 45 4e 20 44 4f 3b 53 69 | 67 6e 61 6c 20 45 4e 47 |EN DO;Si|gnal ENG|
|000003b0| 4c 49 53 48 3b 45 4e 44 | 3b 49 46 20 75 70 70 65 |LISH;END|;IF uppe|
|000003c0| 72 28 43 4d 44 29 20 3d | 20 27 53 57 45 44 49 53 |r(CMD) =| 'SWEDIS|
|000003d0| 48 27 20 54 48 45 4e 20 | 44 4f 3b 53 69 67 6e 61 |H' THEN |DO;Signa|
|000003e0| 6c 20 53 57 45 44 49 53 | 48 3b 45 4e 44 3b 49 46 |l SWEDIS|H;END;IF|
|000003f0| 20 75 70 70 65 72 28 43 | 4d 44 29 20 3d 20 27 44 | upper(C|MD) = 'D|
|00000400| 55 54 43 48 27 20 54 48 | 45 4e 20 44 4f 3b 53 69 |UTCH' TH|EN DO;Si|
|00000410| 67 6e 61 6c 20 44 55 54 | 43 48 3b 45 4e 44 3b 49 |gnal DUT|CH;END;I|
|00000420| 46 20 75 70 70 65 72 28 | 43 4d 44 29 20 3d 20 27 |F upper(|CMD) = '|
|00000430| 46 52 45 4e 43 48 27 20 | 54 48 45 4e 20 44 4f 3b |FRENCH' |THEN DO;|
|00000440| 53 69 67 6e 61 6c 20 46 | 52 45 4e 43 48 3b 45 4e |Signal F|RENCH;EN|
|00000450| 44 3b 49 46 20 75 70 70 | 65 72 28 43 4d 44 29 20 |D;IF upp|er(CMD) |
|00000460| 3d 20 27 43 48 45 46 27 | 20 54 48 45 4e 20 44 4f |= 'CHEF'| THEN DO|
|00000470| 3b 53 69 67 6e 61 6c 20 | 43 48 45 46 3b 45 4e 44 |;Signal |CHEF;END|
|00000480| 3b 49 46 20 75 70 70 65 | 72 28 43 4d 44 29 20 3d |;IF uppe|r(CMD) =|
|00000490| 20 27 47 49 42 42 45 52 | 49 53 48 27 20 54 48 45 | 'GIBBER|ISH' THE|
|000004a0| 4e 20 44 4f 3b 53 69 67 | 6e 61 6c 20 47 49 42 42 |N DO;Sig|nal GIBB|
|000004b0| 45 52 49 53 48 3b 45 4e | 44 3b 49 46 20 75 70 70 |ERISH;EN|D;IF upp|
|000004c0| 65 72 28 43 4d 44 29 20 | 3d 20 27 56 45 52 53 49 |er(CMD) |= 'VERSI|
|000004d0| 4f 4e 49 53 27 20 54 48 | 45 4e 20 44 4f 3b 53 69 |ONIS' TH|EN DO;Si|
|000004e0| 67 6e 61 6c 20 56 45 52 | 53 49 4f 4e 49 53 3b 45 |gnal VER|SIONIS;E|
|000004f0| 4e 44 3b 53 41 59 20 27 | 27 3b 53 41 59 20 49 54 |ND;SAY '|';SAY IT|
|00000500| 41 4c 49 43 27 27 57 48 | 49 54 45 27 27 42 4f 4c |ALIC''WH|ITE''BOL|
|00000510| 44 27 54 61 6c 6b 69 6e | 67 20 43 6c 6f 63 6b 20 |D'Talkin|g Clock |
|00000520| 76 30 2e 39 20 27 50 4c | 41 49 4e 27 27 42 4f 4c |v0.9 'PL|AIN''BOL|
|00000530| 44 27 20 a9 31 39 39 36 | 20 46 75 73 69 6f 6e 20 |D' .1996| Fusion |
|00000540| 44 65 73 69 67 6e 27 50 | 4c 41 49 4e 3b 53 41 59 |Design'P|LAIN;SAY|
|00000550| 20 49 54 41 4c 49 43 27 | 20 20 20 20 20 20 20 57 | ITALIC'|       W|
|00000560| 72 69 74 74 65 6e 20 42 | 79 3a 20 45 64 77 61 72 |ritten B|y: Edwar|
|00000570| 64 20 46 61 72 72 6f 77 | 27 50 4c 41 49 4e 3b 53 |d Farrow|'PLAIN;S|
|00000580| 41 59 20 27 27 3b 53 41 | 59 20 49 54 41 4c 49 43 |AY '';SA|Y ITALIC|
|00000590| 27 55 73 61 67 65 3a 20 | 20 27 50 4c 41 49 4e 27 |'Usage: | 'PLAIN'|
|000005a0| 27 42 4f 4c 44 27 54 43 | 6c 6f 63 6b 20 3c 6c 61 |'BOLD'TC|lock <la|
|000005b0| 6e 67 75 61 67 65 7c 61 | 62 6f 75 74 3e 20 5b 65 |nguage|a|bout> [e|
|000005c0| 6c 69 74 65 5d 27 50 4c | 41 49 4e 3b 53 41 59 20 |lite]'PL|AIN;SAY |
|000005d0| 27 27 3b 45 58 49 54 3b | 45 4e 44 3b 49 46 20 75 |'';EXIT;|END;IF u|
|000005e0| 70 70 65 72 28 42 49 54 | 29 20 3d 20 27 45 4c 49 |pper(BIT|) = 'ELI|
|000005f0| 54 45 27 20 54 48 45 4e | 20 44 4f 3b 49 46 20 75 |TE' THEN| DO;IF u|
|00000600| 70 70 65 72 28 43 4d 44 | 29 20 3d 20 27 56 45 52 |pper(CMD|) = 'VER|
|00000610| 53 49 4f 4e 49 53 27 20 | 54 48 45 4e 20 44 4f 3b |SIONIS' |THEN DO;|
|00000620| 53 69 67 6e 61 6c 20 56 | 45 52 53 49 4f 4e 49 53 |Signal V|ERSIONIS|
|00000630| 45 4c 49 54 45 3b 45 4e | 44 3b 49 46 20 75 70 70 |ELITE;EN|D;IF upp|
|00000640| 65 72 28 43 4d 44 29 20 | 3d 20 27 45 4e 47 4c 49 |er(CMD) |= 'ENGLI|
|00000650| 53 48 27 20 54 48 45 4e | 20 44 4f 3b 53 69 67 6e |SH' THEN| DO;Sign|
|00000660| 61 6c 20 45 4e 47 4c 49 | 53 48 45 4c 49 54 45 3b |al ENGLI|SHELITE;|
|00000670| 45 4e 44 3b 49 46 20 75 | 70 70 65 72 28 43 4d 44 |END;IF u|pper(CMD|
|00000680| 29 20 3d 20 27 46 52 45 | 4e 43 48 27 20 54 48 45 |) = 'FRE|NCH' THE|
|00000690| 4e 20 44 4f 3b 53 69 67 | 6e 61 6c 20 46 52 45 4e |N DO;Sig|nal FREN|
|000006a0| 43 48 45 4c 49 54 45 3b | 45 4e 44 3b 49 46 20 75 |CHELITE;|END;IF u|
|000006b0| 70 70 65 72 28 43 4d 44 | 29 20 3d 20 27 44 55 54 |pper(CMD|) = 'DUT|
|000006c0| 43 48 27 20 54 48 45 4e | 20 44 4f 3b 53 69 67 6e |CH' THEN| DO;Sign|
|000006d0| 61 6c 20 44 55 54 43 48 | 45 4c 49 54 45 3b 45 4e |al DUTCH|ELITE;EN|
|000006e0| 44 3b 49 46 20 75 70 70 | 65 72 28 43 4d 44 29 20 |D;IF upp|er(CMD) |
|000006f0| 3d 20 27 53 57 45 44 49 | 53 48 27 20 54 48 45 4e |= 'SWEDI|SH' THEN|
|00000700| 20 44 4f 3b 53 69 67 6e | 61 6c 20 53 57 45 44 49 | DO;Sign|al SWEDI|
|00000710| 53 48 45 4c 49 54 45 3b | 45 4e 44 3b 49 46 20 75 |SHELITE;|END;IF u|
|00000720| 70 70 65 72 28 43 4d 44 | 29 20 3d 20 27 43 48 45 |pper(CMD|) = 'CHE|
|00000730| 46 27 20 54 48 45 4e 20 | 44 4f 3b 53 69 67 6e 61 |F' THEN |DO;Signa|
|00000740| 6c 20 43 48 45 46 45 4c | 49 54 45 3b 45 4e 44 3b |l CHEFEL|ITE;END;|
|00000750| 49 46 20 75 70 70 65 72 | 28 43 4d 44 29 20 3d 20 |IF upper|(CMD) = |
|00000760| 27 47 49 42 42 45 52 49 | 53 48 27 20 54 48 45 4e |'GIBBERI|SH' THEN|
|00000770| 20 44 4f 3b 53 69 67 6e | 61 6c 20 47 49 42 42 45 | DO;Sign|al GIBBE|
|00000780| 52 49 53 48 45 4c 49 54 | 45 3b 45 4e 44 3b 49 46 |RISHELIT|E;END;IF|
|00000790| 20 75 70 70 65 72 28 43 | 4d 44 29 20 3d 20 27 41 | upper(C|MD) = 'A|
|000007a0| 42 4f 55 54 27 20 54 48 | 45 4e 20 44 4f 3b 53 69 |BOUT' TH|EN DO;Si|
|000007b0| 67 6e 61 6c 20 41 42 4f | 55 54 45 4c 49 54 45 3b |gnal ABO|UTELITE;|
|000007c0| 45 4e 44 3b 53 41 59 20 | 27 27 3b 53 41 59 20 49 |END;SAY |'';SAY I|
|000007d0| 54 41 4c 49 43 27 27 57 | 48 49 54 45 27 27 42 4f |TALIC''W|HITE''BO|
|000007e0| 4c 44 27 54 61 6c 6b 69 | 6e 67 20 43 6c 6f 63 6b |LD'Talki|ng Clock|
|000007f0| 20 76 30 2e 39 20 27 50 | 4c 41 49 4e 27 27 42 4f | v0.9 'P|LAIN''BO|
|00000800| 4c 44 27 20 a9 31 39 39 | 36 20 46 75 73 69 6f 6e |LD' .199|6 Fusion|
|00000810| 20 44 65 73 69 67 6e 27 | 50 4c 41 49 4e 3b 53 41 | Design'|PLAIN;SA|
|00000820| 59 20 49 54 41 4c 49 43 | 27 20 20 20 20 20 20 20 |Y ITALIC|'       |
|00000830| 57 72 69 74 74 65 6e 20 | 42 79 3a 20 45 64 77 61 |Written |By: Edwa|
|00000840| 72 64 20 46 61 72 72 6f | 77 27 50 4c 41 49 4e 3b |rd Farro|w'PLAIN;|
|00000850| 53 41 59 20 27 27 3b 53 | 41 59 20 49 54 41 4c 49 |SAY '';S|AY ITALI|
|00000860| 43 27 55 73 61 67 65 3a | 20 20 27 50 4c 41 49 4e |C'Usage:|  'PLAIN|
|00000870| 27 27 42 4f 4c 44 27 54 | 43 6c 6f 63 6b 20 3c 6c |''BOLD'T|Clock <l|
|00000880| 61 6e 67 75 61 67 65 7c | 61 62 6f 75 74 3e 20 5b |anguage||about> [|
|00000890| 65 6c 69 74 65 5d 27 50 | 4c 41 49 4e 3b 53 41 59 |elite]'P|LAIN;SAY|
|000008a0| 20 27 27 3b 45 58 49 54 | 3b 45 4e 44 3b 41 42 4f | '';EXIT|;END;ABO|
|000008b0| 55 54 3a 3b 53 41 59 20 | 27 27 3b 53 41 59 20 49 |UT:;SAY |'';SAY I|
|000008c0| 54 41 4c 49 43 27 27 57 | 48 49 54 45 27 27 42 4f |TALIC''W|HITE''BO|
|000008d0| 4c 44 27 20 20 20 20 20 | 20 54 61 6c 6b 69 6e 67 |LD'     | Talking|
|000008e0| 20 43 6c 6f 63 6b 20 76 | 30 2e 39 20 27 50 4c 41 | Clock v|0.9 'PLA|
|000008f0| 49 4e 27 27 42 4f 4c 44 | 27 20 a9 31 39 39 36 20 |IN''BOLD|' .1996 |
|00000900| 46 75 73 69 6f 6e 20 44 | 65 73 69 67 6e 27 50 4c |Fusion D|esign'PL|
|00000910| 41 49 4e 3b 53 41 59 20 | 49 54 41 4c 49 43 27 20 |AIN;SAY |ITALIC' |
|00000920| 20 20 20 20 20 20 20 20 | 20 20 20 57 72 69 74 74 |        |   Writt|
|00000930| 65 6e 20 42 79 3a 20 45 | 64 77 61 72 64 20 46 61 |en By: E|dward Fa|
|00000940| 72 72 6f 77 27 50 4c 41 | 49 4e 3b 53 41 59 20 27 |rrow'PLA|IN;SAY '|
|00000950| 27 3b 53 41 59 20 49 54 | 41 4c 49 43 27 20 20 20 |';SAY IT|ALIC'   |
|00000960| 20 20 20 55 73 61 67 65 | 3a 20 20 27 50 4c 41 49 |   Usage|:  'PLAI|
|00000970| 4e 27 27 42 4f 4c 44 27 | 54 43 6c 6f 63 6b 20 3c |N''BOLD'|TClock <|
|00000980| 6c 61 6e 67 75 61 67 65 | 7c 61 62 6f 75 74 3e 20 |language||about> |
|00000990| 5b 65 6c 69 74 65 5d 27 | 50 4c 41 49 4e 3b 53 41 |[elite]'|PLAIN;SA|
|000009a0| 59 20 27 27 3b 53 41 59 | 20 42 4f 4c 44 27 4c 61 |Y '';SAY| BOLD'La|
|000009b0| 6e 67 75 61 67 65 73 20 | 73 75 70 70 6f 72 74 65 |nguages |supporte|
|000009c0| 64 3a 20 27 50 4c 41 49 | 4e 27 27 49 54 41 4c 49 |d: 'PLAI|N''ITALI|
|000009d0| 43 27 45 6e 67 6c 69 73 | 68 2c 20 53 77 65 64 69 |C'Englis|h, Swedi|
|000009e0| 73 68 2c 20 44 75 74 63 | 68 2c 27 50 4c 41 49 4e |sh, Dutc|h,'PLAIN|
|000009f0| 3b 53 41 59 20 49 54 41 | 4c 49 43 27 20 20 20 20 |;SAY ITA|LIC'    |
|00000a00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a10| 20 46 72 65 6e 63 68 2c | 20 43 68 65 66 2c 20 47 | French,| Chef, G|
|00000a20| 69 62 62 65 72 69 73 68 | 27 50 4c 41 49 4e 3b 53 |ibberish|'PLAIN;S|
|00000a30| 41 59 20 27 27 3b 53 41 | 59 20 49 54 41 4c 49 43 |AY '';SA|Y ITALIC|
|00000a40| 27 27 57 48 49 54 45 27 | 27 42 4f 4c 44 27 20 20 |''WHITE'|'BOLD'  |
|00000a50| 20 20 54 68 65 20 27 53 | 51 27 65 6c 69 74 65 27 |  The 'S|Q'elite'|
|00000a60| 53 51 27 20 6f 70 74 69 | 6f 6e 20 77 6f 72 6b 73 |SQ' opti|on works|
|00000a70| 20 77 69 74 68 20 61 6e | 79 20 6c 61 6e 67 75 61 | with an|y langua|
|00000a80| 67 65 2e 27 50 4c 41 49 | 4e 3b 53 41 59 20 27 27 |ge.'PLAI|N;SAY ''|
|00000a90| 3b 45 58 49 54 3b 56 45 | 52 53 49 4f 4e 49 53 3a |;EXIT;VE|RSIONIS:|
|00000aa0| 3b 53 41 59 20 27 27 3b | 53 41 59 20 49 54 41 4c |;SAY '';|SAY ITAL|
|00000ab0| 49 43 27 54 68 65 20 43 | 75 72 72 65 6e 74 20 56 |IC'The C|urrent V|
|00000ac0| 65 72 73 69 6f 6e 20 4f | 66 20 54 43 6c 6f 63 6b |ersion O|f TClock|
|00000ad0| 20 49 73 3a 20 27 57 48 | 49 54 45 27 27 42 4f 4c | Is: 'WH|ITE''BOL|
|00000ae0| 44 27 76 30 2e 39 20 27 | 50 4c 41 49 4e 3b 53 41 |D'v0.9 '|PLAIN;SA|
|00000af0| 59 20 27 27 3b 45 58 49 | 54 3b 45 4e 47 4c 49 53 |Y '';EXI|T;ENGLIS|
|00000b00| 48 3a 3b 48 72 2e 30 3d | 27 74 77 65 6c 76 65 20 |H:;Hr.0=|'twelve |
|00000b10| 27 3b 48 72 2e 31 3d 27 | 6f 6e 65 20 27 3b 48 72 |';Hr.1='|one ';Hr|
|00000b20| 2e 32 3d 27 74 77 6f 20 | 27 3b 48 72 2e 33 3d 27 |.2='two |';Hr.3='|
|00000b30| 74 68 72 65 65 20 27 3b | 48 72 2e 34 3d 27 66 6f |three ';|Hr.4='fo|
|00000b40| 75 72 20 27 3b 48 72 2e | 35 3d 27 66 69 76 65 20 |ur ';Hr.|5='five |
|00000b50| 27 3b 48 72 2e 36 3d 27 | 73 69 78 20 27 3b 48 72 |';Hr.6='|six ';Hr|
|00000b60| 2e 37 3d 27 73 65 76 65 | 6e 20 27 3b 48 72 2e 38 |.7='seve|n ';Hr.8|
|00000b70| 3d 27 65 69 67 68 74 20 | 27 3b 48 72 2e 39 3d 27 |='eight |';Hr.9='|
|00000b80| 6e 69 6e 65 20 27 3b 48 | 72 2e 31 30 3d 27 74 65 |nine ';H|r.10='te|
|00000b90| 6e 20 27 3b 48 72 2e 31 | 31 3d 27 65 6c 65 76 65 |n ';Hr.1|1='eleve|
|00000ba0| 6e 27 3b 4d 6e 2e 30 3d | 27 27 3b 4d 6e 2e 31 3d |n';Mn.0=|'';Mn.1=|
|00000bb0| 27 66 69 76 65 20 27 3b | 4d 6e 2e 32 3d 27 74 65 |'five ';|Mn.2='te|
|00000bc0| 6e 20 27 3b 4d 6e 2e 33 | 3d 27 61 20 71 75 61 72 |n ';Mn.3|='a quar|
|00000bd0| 74 65 72 20 27 3b 4d 6e | 2e 34 3d 27 74 77 65 6e |ter ';Mn|.4='twen|
|00000be0| 74 79 20 27 3b 4d 6e 2e | 35 3d 27 74 77 65 6e 74 |ty ';Mn.|5='twent|
|00000bf0| 79 2d 66 69 76 65 20 27 | 3b 4d 6e 2e 36 3d 27 68 |y-five '|;Mn.6='h|
|00000c00| 61 6c 66 20 27 3b 4e 79 | 2e 30 3d 27 6e 65 61 72 |alf ';Ny|.0='near|
|00000c10| 6c 79 20 27 3b 4e 79 2e | 31 3d 27 61 6c 6d 6f 73 |ly ';Ny.|1='almos|
|00000c20| 74 20 27 3b 4e 79 2e 32 | 3d 27 27 3b 4e 79 2e 33 |t ';Ny.2|='';Ny.3|
|00000c30| 3d 27 6a 75 73 74 20 61 | 66 74 65 72 20 27 3b 4e |='just a|fter ';N|
|00000c40| 79 2e 34 3d 27 61 66 74 | 65 72 20 27 3b 55 70 2e |y.4='aft|er ';Up.|
|00000c50| 30 3d 27 74 6f 20 27 3b | 55 70 2e 31 3d 27 27 3b |0='to ';|Up.1='';|
|00000c60| 55 70 2e 32 3d 27 70 61 | 73 74 20 27 3b 54 49 4d |Up.2='pa|st ';TIM|
|00000c70| 45 5f 4e 4f 57 20 3d 20 | 28 54 49 4d 45 28 27 53 |E_NOW = |(TIME('S|
|00000c80| 27 29 20 2b 20 31 36 35 | 30 29 20 25 20 36 30 3b |') + 165|0) % 60;|
|00000c90| 48 72 73 20 3d 20 28 54 | 49 4d 45 5f 4e 4f 57 20 |Hrs = (T|IME_NOW |
|00000ca0| 25 20 36 30 29 20 2f 2f | 20 31 32 3b 4d 69 6e 20 |% 60) //| 12;Min |
|00000cb0| 3d 20 54 49 4d 45 5f 4e | 4f 57 20 2f 2f 20 36 30 |= TIME_N|OW // 60|
|00000cc0| 3b 41 6c 6d 20 3d 20 4d | 69 6e 20 2f 2f 20 35 3b |;Alm = M|in // 5;|
|00000cd0| 44 69 76 20 3d 20 28 4d | 49 4e 20 25 20 35 29 20 |Div = (M|IN % 5) |
|00000ce0| 2d 20 35 3b 55 70 74 20 | 3d 20 53 49 47 4e 28 44 |- 5;Upt |= SIGN(D|
|00000cf0| 69 76 29 20 2b 20 31 3b | 49 46 20 44 69 76 20 3c |iv) + 1;|IF Div <|
|00000d00| 20 30 20 54 48 45 4e 20 | 44 69 76 20 3d 20 2d 44 | 0 THEN |Div = -D|
|00000d10| 69 76 3b 4f 43 6c 6f 63 | 6b 20 3d 20 22 49 74 27 |iv;OCloc|k = "It'|
|00000d20| 73 20 22 20 7c 7c 20 4e | 79 2e 41 6c 6d 20 7c 7c |s " || N|y.Alm |||
|00000d30| 20 4d 6e 2e 44 69 76 20 | 7c 7c 20 55 70 2e 55 70 | Mn.Div ||| Up.Up|
|00000d40| 74 20 7c 7c 20 48 72 2e | 48 72 73 3b 49 46 20 44 |t || Hr.|Hrs;IF D|
|00000d50| 69 76 20 3d 3d 20 30 20 | 54 48 45 4e 20 4f 43 6c |iv == 0 |THEN OCl|
|00000d60| 6f 63 6b 20 3d 20 4f 43 | 6c 6f 63 6b 20 7c 7c 20 |ock = OC|lock || |
|00000d70| 22 6f 27 63 6c 6f 63 6b | 22 3b 53 41 59 20 27 27 |"o'clock|";SAY ''|
|00000d80| 3b 53 41 59 20 27 27 4f | 43 6c 6f 63 6b 3b 53 41 |;SAY ''O|Clock;SA|
|00000d90| 59 20 27 27 3b 45 58 49 | 54 3b 53 57 45 44 49 53 |Y '';EXI|T;SWEDIS|
|00000da0| 48 3a 3b 48 72 2e 30 3d | 27 74 6f 6c 76 20 27 3b |H:;Hr.0=|'tolv ';|
|00000db0| 48 72 2e 31 3d 27 65 74 | 74 20 27 3b 48 72 2e 32 |Hr.1='et|t ';Hr.2|
|00000dc0| 3d 27 74 76 27 41 42 27 | 20 27 3b 48 72 2e 33 3d |='tv'AB'| ';Hr.3=|
|00000dd0| 27 74 72 65 20 27 3b 48 | 72 2e 34 3d 27 66 79 72 |'tre ';H|r.4='fyr|
|00000de0| 61 20 27 3b 48 72 2e 35 | 3d 27 66 65 6d 20 27 3b |a ';Hr.5|='fem ';|
|00000df0| 48 72 2e 36 3d 27 73 65 | 78 20 27 3b 48 72 2e 37 |Hr.6='se|x ';Hr.7|
|00000e00| 3d 27 73 6a 75 20 27 3b | 48 72 2e 38 3d 27 27 41 |='sju ';|Hr.8=''A|
|00000e10| 42 27 74 74 61 20 27 3b | 48 72 2e 39 3d 27 6e 69 |B'tta ';|Hr.9='ni|
|00000e20| 6f 20 27 3b 48 72 2e 31 | 30 3d 27 74 69 6f 20 27 |o ';Hr.1|0='tio '|
|00000e30| 3b 48 72 2e 31 31 3d 27 | 65 6c 76 61 27 3b 4d 6e |;Hr.11='|elva';Mn|
|00000e40| 2e 30 3d 27 27 3b 4d 6e | 2e 31 3d 27 66 65 6d 20 |.0='';Mn|.1='fem |
|00000e50| 27 3b 4d 6e 2e 32 3d 27 | 74 69 6f 20 27 3b 4d 6e |';Mn.2='|tio ';Mn|
|00000e60| 2e 33 3d 27 6b 76 61 72 | 74 20 27 3b 4d 6e 2e 34 |.3='kvar|t ';Mn.4|
|00000e70| 3d 27 74 6a 75 67 6f 20 | 27 3b 4d 6e 2e 35 3d 27 |='tjugo |';Mn.5='|
|00000e80| 74 6a 75 67 6f 2d 66 65 | 6d 20 27 3b 4d 6e 2e 36 |tjugo-fe|m ';Mn.6|
|00000e90| 3d 27 68 61 6c 76 20 27 | 3b 4e 79 2e 30 3d 27 6e |='halv '|;Ny.0='n|
|00000ea0| 27 41 41 27 73 74 61 6e | 20 27 3b 4e 79 2e 31 3d |'AA'stan| ';Ny.1=|
|00000eb0| 27 6e 27 41 41 27 73 74 | 61 6e 20 27 3b 4e 79 2e |'n'AA'st|an ';Ny.|
|00000ec0| 32 3d 27 27 3b 4e 79 2e | 33 3d 27 73 74 72 61 78 |2='';Ny.|3='strax|
|00000ed0| 20 65 66 74 65 72 20 27 | 3b 4e 79 2e 34 3d 27 65 | efter '|;Ny.4='e|
|00000ee0| 66 74 65 72 20 27 3b 55 | 70 2e 30 3d 27 69 20 27 |fter ';U|p.0='i '|
|00000ef0| 3b 55 70 2e 31 3d 27 27 | 3b 55 70 2e 32 3d 27 27 |;Up.1=''|;Up.2=''|
|00000f00| 4f 41 27 76 65 72 20 27 | 3b 54 49 4d 45 5f 4e 4f |OA'ver '|;TIME_NO|
|00000f10| 57 20 3d 20 28 54 49 4d | 45 28 27 53 27 29 20 2b |W = (TIM|E('S') +|
|00000f20| 20 31 36 35 30 29 20 25 | 20 36 30 3b 48 72 73 20 | 1650) %| 60;Hrs |
|00000f30| 3d 20 28 54 49 4d 45 5f | 4e 4f 57 20 25 20 36 30 |= (TIME_|NOW % 60|
|00000f40| 29 20 2f 2f 20 31 32 3b | 4d 69 6e 20 3d 20 54 49 |) // 12;|Min = TI|
|00000f50| 4d 45 5f 4e 4f 57 20 2f | 2f 20 36 30 3b 41 6c 6d |ME_NOW /|/ 60;Alm|
|00000f60| 20 3d 20 4d 69 6e 20 2f | 2f 20 35 3b 44 69 76 20 | = Min /|/ 5;Div |
|00000f70| 3d 20 28 4d 49 4e 20 25 | 20 35 29 20 2d 20 35 3b |= (MIN %| 5) - 5;|
|00000f80| 55 70 74 20 3d 20 53 49 | 47 4e 28 44 69 76 29 20 |Upt = SI|GN(Div) |
|00000f90| 2b 20 31 3b 49 46 20 44 | 69 76 20 3c 20 30 20 54 |+ 1;IF D|iv < 0 T|
|00000fa0| 48 45 4e 20 44 69 76 20 | 3d 20 2d 44 69 76 3b 4f |HEN Div |= -Div;O|
|00000fb0| 43 6c 6f 63 6b 20 3d 20 | 22 6b 6f 63 6b 61 6e 20 |Clock = |"kockan |
|00000fc0| 22 41 41 22 72 20 22 20 | 7c 7c 20 4e 79 2e 41 6c |"AA"r " ||| Ny.Al|
|00000fd0| 6d 20 7c 7c 20 4d 6e 2e | 44 69 76 20 7c 7c 20 55 |m || Mn.|Div || U|
|00000fe0| 70 2e 55 70 74 20 7c 7c | 20 48 72 2e 48 72 73 3b |p.Upt ||| Hr.Hrs;|
|00000ff0| 49 46 20 44 69 76 20 3d | 3d 20 30 20 54 48 45 4e |IF Div =|= 0 THEN|
|00001000| 20 4f 43 6c 6f 63 6b 20 | 3d 20 4f 43 6c 6f 63 6b | OClock |= OClock|
|00001010| 20 7c 7c 20 22 22 3b 53 | 41 59 20 27 27 3b 53 41 | || "";S|AY '';SA|
|00001020| 59 20 27 27 4f 43 6c 6f | 63 6b 3b 53 41 59 20 27 |Y ''OClo|ck;SAY '|
|00001030| 27 3b 45 58 49 54 3b 46 | 52 45 4e 43 48 3a 3b 48 |';EXIT;F|RENCH:;H|
|00001040| 72 2e 30 3d 27 64 65 75 | 7a 65 20 27 3b 48 72 2e |r.0='deu|ze ';Hr.|
|00001050| 31 3d 27 75 6e 20 27 3b | 48 72 2e 32 3d 27 64 65 |1='un ';|Hr.2='de|
|00001060| 75 78 20 27 3b 48 72 2e | 33 3d 27 74 72 6f 69 73 |ux ';Hr.|3='trois|
|00001070| 20 27 3b 48 72 2e 34 3d | 27 71 75 61 74 72 65 20 | ';Hr.4=|'quatre |
|00001080| 27 3b 48 72 2e 35 3d 27 | 63 69 6e 71 20 27 3b 48 |';Hr.5='|cinq ';H|
|00001090| 72 2e 36 3d 27 73 69 78 | 20 27 3b 48 72 2e 37 3d |r.6='six| ';Hr.7=|
|000010a0| 27 73 65 70 74 20 27 3b | 48 72 2e 38 3d 27 68 75 |'sept ';|Hr.8='hu|
|000010b0| 69 74 20 27 3b 48 72 2e | 39 3d 27 6e 65 75 66 20 |it ';Hr.|9='neuf |
|000010c0| 27 3b 48 72 2e 31 30 3d | 27 64 69 78 20 27 3b 48 |';Hr.10=|'dix ';H|
|000010d0| 72 2e 31 31 3d 27 6f 6e | 7a 65 20 27 3b 4d 6e 2e |r.11='on|ze ';Mn.|
|000010e0| 30 3d 27 27 3b 4d 6e 2e | 31 3d 27 63 69 6e 71 20 |0='';Mn.|1='cinq |
|000010f0| 27 3b 4d 6e 2e 32 3d 27 | 64 69 78 20 27 3b 4d 6e |';Mn.2='|dix ';Mn|
|00001100| 2e 33 3d 27 6c 65 20 71 | 75 61 72 74 20 27 3b 4d |.3='le q|uart ';M|
|00001110| 6e 2e 34 3d 27 76 69 6e | 67 74 20 27 3b 4d 6e 2e |n.4='vin|gt ';Mn.|
|00001120| 35 3d 27 76 69 6e 67 74 | 2d 63 69 6e 71 20 27 3b |5='vingt|-cinq ';|
|00001130| 4d 6e 2e 36 3d 27 64 65 | 6d 69 20 27 3b 4e 79 2e |Mn.6='de|mi ';Ny.|
|00001140| 30 3d 27 70 72 27 45 45 | 27 73 20 64 65 20 27 3b |0='pr'EE|'s de ';|
|00001150| 4e 79 2e 31 3d 27 70 72 | 27 45 45 27 73 20 64 65 |Ny.1='pr|'EE's de|
|00001160| 20 27 3b 4e 79 2e 32 3d | 27 27 3b 4e 79 2e 33 3d | ';Ny.2=|'';Ny.3=|
|00001170| 27 61 70 72 27 45 45 27 | 73 20 27 3b 4e 79 2e 34 |'apr'EE'|s ';Ny.4|
|00001180| 3d 27 61 70 72 27 45 45 | 27 73 20 27 3b 55 70 2e |='apr'EE|'s ';Up.|
|00001190| 30 3d 27 27 41 42 27 20 | 27 3b 55 70 2e 31 3d 27 |0=''AB' |';Up.1='|
|000011a0| 27 3b 55 70 2e 32 3d 27 | 70 61 73 73 27 45 45 27 |';Up.2='|pass'EE'|
|000011b0| 20 27 3b 54 49 4d 45 5f | 4e 4f 57 20 3d 20 28 54 | ';TIME_|NOW = (T|
|000011c0| 49 4d 45 28 27 53 27 29 | 20 2b 20 31 36 35 30 29 |IME('S')| + 1650)|
|000011d0| 20 25 20 36 30 3b 48 72 | 73 20 3d 20 28 54 49 4d | % 60;Hr|s = (TIM|
|000011e0| 45 5f 4e 4f 57 20 25 20 | 36 30 29 20 2f 2f 20 31 |E_NOW % |60) // 1|
|000011f0| 32 3b 4d 69 6e 20 3d 20 | 54 49 4d 45 5f 4e 4f 57 |2;Min = |TIME_NOW|
|00001200| 20 2f 2f 20 36 30 3b 41 | 6c 6d 20 3d 20 4d 69 6e | // 60;A|lm = Min|
|00001210| 20 2f 2f 20 35 3b 44 69 | 76 20 3d 20 28 4d 49 4e | // 5;Di|v = (MIN|
|00001220| 20 25 20 35 29 20 2d 20 | 35 3b 55 70 74 20 3d 20 | % 5) - |5;Upt = |
|00001230| 53 49 47 4e 28 44 69 76 | 29 20 2b 20 31 3b 49 46 |SIGN(Div|) + 1;IF|
|00001240| 20 44 69 76 20 3c 20 30 | 20 54 48 45 4e 20 44 69 | Div < 0| THEN Di|
|00001250| 76 20 3d 20 2d 44 69 76 | 3b 4f 43 6c 6f 63 6b 20 |v = -Div|;OClock |
|00001260| 3d 20 22 c7 27 65 73 74 | 20 22 20 7c 7c 20 4e 79 |= ".'est| " || Ny|
|00001270| 2e 41 6c 6d 20 7c 7c 20 | 4d 6e 2e 44 69 76 20 7c |.Alm || |Mn.Div ||
|00001280| 7c 20 55 70 2e 55 70 74 | 20 7c 7c 20 48 72 2e 48 || Up.Upt| || Hr.H|
|00001290| 72 73 3b 49 46 20 44 69 | 76 20 3d 3d 20 30 20 54 |rs;IF Di|v == 0 T|
|000012a0| 48 45 4e 20 4f 43 6c 6f | 63 6b 20 3d 20 4f 43 6c |HEN OClo|ck = OCl|
|000012b0| 6f 63 6b 20 7c 7c 20 22 | 68 65 75 72 73 22 3b 53 |ock || "|heurs";S|
|000012c0| 41 59 20 27 27 3b 53 41 | 59 20 27 27 4f 43 6c 6f |AY '';SA|Y ''OClo|
|000012d0| 63 6b 3b 53 41 59 20 27 | 27 3b 45 58 49 54 3b 47 |ck;SAY '|';EXIT;G|
|000012e0| 49 42 42 45 52 49 53 48 | 3a 3b 48 72 2e 30 3d 27 |IBBERISH|:;Hr.0='|
|000012f0| 74 77 61 76 61 67 65 6c | 76 20 27 3b 48 72 2e 31 |twavagel|v ';Hr.1|
|00001300| 3d 27 77 75 76 61 67 6f | 6e 65 20 27 3b 48 72 2e |='wuvago|ne ';Hr.|
|00001310| 32 3d 27 74 76 61 67 6f | 6f 20 27 3b 48 72 2e 33 |2='tvago|o ';Hr.3|
|00001320| 3d 27 74 68 76 61 67 65 | 65 20 27 3b 48 72 2e 34 |='thvage|e ';Hr.4|
|00001330| 3d 27 66 76 61 67 6f 72 | 20 27 3b 48 72 2e 35 3d |='fvagor| ';Hr.5=|
|00001340| 27 66 76 61 67 69 76 65 | 20 27 3b 48 72 2e 36 3d |'fvagive| ';Hr.6=|
|00001350| 27 73 76 61 67 69 78 20 | 27 3b 48 72 2e 37 3d 27 |'svagix |';Hr.7='|
|00001360| 73 65 76 61 67 65 76 65 | 6e 20 27 3b 48 72 2e 38 |sevageve|n ';Hr.8|
|00001370| 3d 27 65 76 61 67 61 74 | 65 20 27 3b 48 72 2e 39 |='evagat|e ';Hr.9|
|00001380| 3d 27 6e 69 76 61 67 69 | 6e 65 20 27 3b 48 72 2e |='nivagi|ne ';Hr.|
|00001390| 31 30 3d 27 74 76 61 67 | 65 6e 20 27 3b 48 72 2e |10='tvag|en ';Hr.|
|000013a0| 31 31 3d 27 65 6c 65 76 | 61 67 65 6e 20 27 3b 4d |11='elev|agen ';M|
|000013b0| 6e 2e 30 3d 27 27 3b 4d | 6e 2e 31 3d 27 66 76 61 |n.0='';M|n.1='fva|
|000013c0| 67 69 76 65 20 27 3b 4d | 6e 2e 32 3d 27 74 76 61 |give ';M|n.2='tva|
|000013d0| 67 65 6e 20 27 3b 4d 6e | 2e 33 3d 27 61 76 61 67 |gen ';Mn|.3='avag|
|000013e0| 61 20 71 75 61 76 67 6f | 72 74 61 20 27 3b 4d 6e |a quavgo|rta ';Mn|
|000013f0| 2e 34 3d 27 74 77 65 76 | 61 67 65 6e 74 79 20 27 |.4='twev|agenty '|
|00001400| 3b 4d 6e 2e 35 3d 27 74 | 77 65 76 61 67 65 6e 74 |;Mn.5='t|wevagent|
|00001410| 79 2d 66 76 61 67 69 76 | 65 20 27 3b 4d 6e 2e 36 |y-fvagiv|e ';Mn.6|
|00001420| 3d 27 68 76 61 6c 66 20 | 27 3b 4e 79 2e 30 3d 27 |='hvalf |';Ny.0='|
|00001430| 6e 76 61 67 65 61 72 6c | 79 20 27 3b 4e 79 2e 31 |nvagearl|y ';Ny.1|
|00001440| 3d 27 61 76 61 67 6f 6c | 6d 76 61 67 6f 73 74 20 |='avagol|mvagost |
|00001450| 27 3b 4e 79 2e 32 3d 27 | 27 3b 4e 79 2e 33 3d 27 |';Ny.2='|';Ny.3='|
|00001460| 6a 76 67 75 73 74 20 61 | 76 61 67 61 74 65 72 20 |jvgust a|vagater |
|00001470| 27 3b 4e 79 2e 34 3d 27 | 61 76 61 67 61 74 65 72 |';Ny.4='|avagater|
|00001480| 20 27 3b 55 70 2e 30 3d | 27 74 76 61 67 6f 20 27 | ';Up.0=|'tvago '|
|00001490| 3b 55 70 2e 31 3d 27 27 | 3b 55 70 2e 32 3d 27 70 |;Up.1=''|;Up.2='p|
|000014a0| 76 61 67 61 73 74 20 27 | 3b 54 49 4d 45 5f 4e 4f |vagast '|;TIME_NO|
|000014b0| 57 20 3d 20 28 54 49 4d | 45 28 27 53 27 29 20 2b |W = (TIM|E('S') +|
|000014c0| 20 31 36 35 30 29 20 25 | 20 36 30 3b 48 72 73 20 | 1650) %| 60;Hrs |
|000014d0| 3d 20 28 54 49 4d 45 5f | 4e 4f 57 20 25 20 36 30 |= (TIME_|NOW % 60|
|000014e0| 29 20 2f 2f 20 31 32 3b | 4d 69 6e 20 3d 20 54 49 |) // 12;|Min = TI|
|000014f0| 4d 45 5f 4e 4f 57 20 2f | 2f 20 36 30 3b 41 6c 6d |ME_NOW /|/ 60;Alm|
|00001500| 20 3d 20 4d 69 6e 20 2f | 2f 20 35 3b 44 69 76 20 | = Min /|/ 5;Div |
|00001510| 3d 20 28 4d 49 4e 20 25 | 20 35 29 20 2d 20 35 3b |= (MIN %| 5) - 5;|
|00001520| 55 70 74 20 3d 20 53 49 | 47 4e 28 44 69 76 29 20 |Upt = SI|GN(Div) |
|00001530| 2b 20 31 3b 49 46 20 44 | 69 76 20 3c 20 30 20 54 |+ 1;IF D|iv < 0 T|
|00001540| 48 45 4e 20 44 69 76 20 | 3d 20 2d 44 69 76 3b 4f |HEN Div |= -Div;O|
|00001550| 43 6c 6f 63 6b 20 3d 20 | 22 49 76 61 67 69 74 73 |Clock = |"Ivagits|
|00001560| 20 22 20 7c 7c 20 4e 79 | 2e 41 6c 6d 20 7c 7c 20 | " || Ny|.Alm || |
|00001570| 4d 6e 2e 44 69 76 20 7c | 7c 20 55 70 2e 55 70 74 |Mn.Div ||| Up.Upt|
|00001580| 20 7c 7c 20 48 72 2e 48 | 72 73 3b 49 46 20 44 69 | || Hr.H|rs;IF Di|
|00001590| 76 20 3d 3d 20 30 20 54 | 48 45 4e 20 4f 43 6c 6f |v == 0 T|HEN OClo|
|000015a0| 63 6b 20 3d 20 4f 43 6c | 6f 63 6b 20 7c 7c 20 22 |ck = OCl|ock || "|
|000015b0| 4f 76 61 67 6f 27 43 6c | 6f 76 61 67 6f 6b 22 3b |Ovago'Cl|ovagok";|
|000015c0| 53 41 59 20 27 27 3b 53 | 41 59 20 27 27 4f 43 6c |SAY '';S|AY ''OCl|
|000015d0| 6f 63 6b 3b 53 41 59 20 | 27 27 3b 45 58 49 54 3b |ock;SAY |'';EXIT;|
|000015e0| 43 48 45 46 3a 3b 48 72 | 2e 30 3d 27 74 77 65 6c |CHEF:;Hr|.0='twel|
|000015f0| 76 6f 20 27 3b 48 72 2e | 31 3d 27 6f 6e 65 6f 20 |vo ';Hr.|1='oneo |
|00001600| 27 3b 48 72 2e 32 3d 27 | 74 77 6f 77 6f 20 27 3b |';Hr.2='|twowo ';|
|00001610| 48 72 2e 33 3d 27 74 68 | 72 65 6f 20 27 3b 48 72 |Hr.3='th|reo ';Hr|
|00001620| 2e 34 3d 27 66 6f 75 72 | 6f 20 27 3b 48 72 2e 35 |.4='four|o ';Hr.5|
|00001630| 3d 27 66 69 76 6f 20 27 | 3b 48 72 2e 36 3d 27 73 |='fivo '|;Hr.6='s|
|00001640| 69 78 6f 20 27 3b 48 72 | 2e 37 3d 27 73 65 76 65 |ixo ';Hr|.7='seve|
|00001650| 6e 6f 20 27 3b 48 72 2e | 38 3d 27 65 69 67 68 74 |no ';Hr.|8='eight|
|00001660| 6f 20 27 3b 48 72 2e 39 | 3d 27 6e 69 6e 65 6f 20 |o ';Hr.9|='nineo |
|00001670| 27 3b 48 72 2e 31 30 3d | 27 74 65 6e 6f 20 27 3b |';Hr.10=|'teno ';|
|00001680| 48 72 2e 31 31 3d 27 65 | 6c 65 76 65 6e 6f 20 27 |Hr.11='e|leveno '|
|00001690| 3b 4d 6e 2e 30 3d 27 27 | 3b 4d 6e 2e 31 3d 27 66 |;Mn.0=''|;Mn.1='f|
|000016a0| 69 76 65 6f 20 27 3b 4d | 6e 2e 32 3d 27 74 65 6e |iveo ';M|n.2='ten|
|000016b0| 6f 20 27 3b 4d 6e 2e 33 | 3d 27 61 6f 20 71 75 61 |o ';Mn.3|='ao qua|
|000016c0| 72 74 6f 20 27 3b 4d 6e | 2e 34 3d 27 74 77 65 6e |rto ';Mn|.4='twen|
|000016d0| 74 79 6f 20 27 3b 4d 6e | 2e 35 3d 27 74 77 65 6e |tyo ';Mn|.5='twen|
|000016e0| 74 79 6f 2d 66 69 76 6f | 20 27 3b 4d 6e 2e 36 3d |tyo-fivo| ';Mn.6=|
|000016f0| 27 68 61 6c 66 6f 20 27 | 3b 4e 79 2e 30 3d 27 6e |'halfo '|;Ny.0='n|
|00001700| 65 61 72 6c 79 6f 20 27 | 3b 4e 79 2e 31 3d 27 61 |earlyo '|;Ny.1='a|
|00001710| 6c 6d 6f 73 74 6f 20 27 | 3b 4e 79 2e 32 3d 27 27 |lmosto '|;Ny.2=''|
|00001720| 3b 4e 79 2e 33 3d 27 6a | 75 73 74 6f 20 61 66 74 |;Ny.3='j|usto aft|
|00001730| 65 72 6f 20 27 3b 4e 79 | 2e 34 3d 27 61 66 74 65 |ero ';Ny|.4='afte|
|00001740| 72 6f 20 27 3b 55 70 2e | 30 3d 27 74 6f 79 6f 20 |ro ';Up.|0='toyo |
|00001750| 27 3b 55 70 2e 31 3d 27 | 27 3b 55 70 2e 32 3d 27 |';Up.1='|';Up.2='|
|00001760| 70 61 73 74 6f 20 27 3b | 54 49 4d 45 5f 4e 4f 57 |pasto ';|TIME_NOW|
|00001770| 20 3d 20 28 54 49 4d 45 | 28 27 53 27 29 20 2b 20 | = (TIME|('S') + |
|00001780| 31 36 35 30 29 20 25 20 | 36 30 3b 48 72 73 20 3d |1650) % |60;Hrs =|
|00001790| 20 28 54 49 4d 45 5f 4e | 4f 57 20 25 20 36 30 29 | (TIME_N|OW % 60)|
|000017a0| 20 2f 2f 20 31 32 3b 4d | 69 6e 20 3d 20 54 49 4d | // 12;M|in = TIM|
|000017b0| 45 5f 4e 4f 57 20 2f 2f | 20 36 30 3b 41 6c 6d 20 |E_NOW //| 60;Alm |
|000017c0| 3d 20 4d 69 6e 20 2f 2f | 20 35 3b 44 69 76 20 3d |= Min //| 5;Div =|
|000017d0| 20 28 4d 49 4e 20 25 20 | 35 29 20 2d 20 35 3b 55 | (MIN % |5) - 5;U|
|000017e0| 70 74 20 3d 20 53 49 47 | 4e 28 44 69 76 29 20 2b |pt = SIG|N(Div) +|
|000017f0| 20 31 3b 49 46 20 44 69 | 76 20 3c 20 30 20 54 48 | 1;IF Di|v < 0 TH|
|00001800| 45 4e 20 44 69 76 20 3d | 20 2d 44 69 76 3b 4f 43 |EN Div =| -Div;OC|
|00001810| 6c 6f 63 6b 20 3d 20 22 | 45 66 66 20 45 66 66 20 |lock = "|Eff Eff |
|00001820| 45 66 66 20 49 74 73 6f | 20 22 20 7c 7c 20 4e 79 |Eff Itso| " || Ny|
|00001830| 2e 41 6c 6d 20 7c 7c 20 | 4d 6e 2e 44 69 76 20 7c |.Alm || |Mn.Div ||
|00001840| 7c 20 55 70 2e 55 70 74 | 20 7c 7c 20 48 72 2e 48 || Up.Upt| || Hr.H|
|00001850| 72 73 3b 49 46 20 44 69 | 76 20 3d 3d 20 30 20 54 |rs;IF Di|v == 0 T|
|00001860| 48 45 4e 20 4f 43 6c 6f | 63 6b 20 3d 20 4f 43 6c |HEN OClo|ck = OCl|
|00001870| 6f 63 6b 20 7c 7c 20 22 | 6f 27 63 6c 6f 63 6b 6f |ock || "|o'clocko|
|00001880| 22 3b 53 41 59 20 27 27 | 3b 53 41 59 20 27 27 4f |";SAY ''|;SAY ''O|
|00001890| 43 6c 6f 63 6b 3b 53 41 | 59 20 27 27 3b 45 58 49 |Clock;SA|Y '';EXI|
|000018a0| 54 3b 44 55 54 43 48 3a | 3b 48 72 2e 30 3d 27 74 |T;DUTCH:|;Hr.0='t|
|000018b0| 77 61 61 6c 66 20 27 3b | 48 72 2e 31 3d 27 65 65 |waalf ';|Hr.1='ee|
|000018c0| 6e 20 27 3b 48 72 2e 32 | 3d 27 74 77 65 65 20 27 |n ';Hr.2|='twee '|
|000018d0| 3b 48 72 2e 33 3d 27 64 | 72 69 65 20 27 3b 48 72 |;Hr.3='d|rie ';Hr|
|000018e0| 2e 34 3d 27 76 69 65 72 | 20 27 3b 48 72 2e 35 3d |.4='vier| ';Hr.5=|
|000018f0| 27 76 69 6a 66 20 27 3b | 48 72 2e 36 3d 27 7a 65 |'vijf ';|Hr.6='ze|
|00001900| 73 20 27 3b 48 72 2e 37 | 3d 27 7a 65 76 65 6e 20 |s ';Hr.7|='zeven |
|00001910| 27 3b 48 72 2e 38 3d 27 | 61 63 68 74 20 27 3b 48 |';Hr.8='|acht ';H|
|00001920| 72 2e 39 3d 27 6e 65 67 | 65 6e 20 27 3b 48 72 2e |r.9='neg|en ';Hr.|
|00001930| 31 30 3d 27 74 65 6e 20 | 27 3b 48 72 2e 31 31 3d |10='ten |';Hr.11=|
|00001940| 27 65 6c 66 20 27 3b 4d | 6e 2e 30 3d 27 27 3b 4d |'elf ';M|n.0='';M|
|00001950| 6e 2e 31 3d 27 76 69 6a | 66 20 27 3b 4d 6e 2e 32 |n.1='vij|f ';Mn.2|
|00001960| 3d 27 74 65 6e 20 27 3b | 4d 6e 2e 33 3d 27 6b 77 |='ten ';|Mn.3='kw|
|00001970| 61 72 74 69 65 72 20 27 | 3b 4d 6e 2e 34 3d 27 74 |artier '|;Mn.4='t|
|00001980| 77 69 6e 74 69 67 20 27 | 3b 4d 6e 2e 35 3d 27 76 |wintig '|;Mn.5='v|
|00001990| 69 6a 66 65 6e 2d 74 77 | 69 6e 74 69 67 20 27 3b |ijfen-tw|intig ';|
|000019a0| 4d 6e 2e 36 3d 27 68 6c | 61 66 20 27 3b 4e 79 2e |Mn.6='hl|af ';Ny.|
|000019b0| 30 3d 27 62 69 6a 6e 61 | 20 27 3b 4e 79 2e 31 3d |0='bijna| ';Ny.1=|
|000019c0| 27 62 69 6a 6e 61 20 27 | 3b 4e 79 2e 32 3d 27 27 |'bijna '|;Ny.2=''|
|000019d0| 3b 4e 79 2e 33 3d 27 6e | 65 74 20 65 72 6e 61 20 |;Ny.3='n|et erna |
|000019e0| 27 3b 4e 79 2e 34 3d 27 | 65 72 6e 61 20 27 3b 55 |';Ny.4='|erna ';U|
|000019f0| 70 2e 30 3d 27 76 6f 6f | 72 20 27 3b 55 70 2e 31 |p.0='voo|r ';Up.1|
|00001a00| 3d 27 27 3b 55 70 2e 32 | 3d 27 6e 61 20 27 3b 54 |='';Up.2|='na ';T|
|00001a10| 49 4d 45 5f 4e 4f 57 20 | 3d 20 28 54 49 4d 45 28 |IME_NOW |= (TIME(|
|00001a20| 27 53 27 29 20 2b 20 31 | 36 35 30 29 20 25 20 36 |'S') + 1|650) % 6|
|00001a30| 30 3b 48 72 73 20 3d 20 | 28 54 49 4d 45 5f 4e 4f |0;Hrs = |(TIME_NO|
|00001a40| 57 20 25 20 36 30 29 20 | 2f 2f 20 31 32 3b 4d 69 |W % 60) |// 12;Mi|
|00001a50| 6e 20 3d 20 54 49 4d 45 | 5f 4e 4f 57 20 2f 2f 20 |n = TIME|_NOW // |
|00001a60| 36 30 3b 41 6c 6d 20 3d | 20 4d 69 6e 20 2f 2f 20 |60;Alm =| Min // |
|00001a70| 35 3b 44 69 76 20 3d 20 | 28 4d 49 4e 20 25 20 35 |5;Div = |(MIN % 5|
|00001a80| 29 20 2d 20 35 3b 55 70 | 74 20 3d 20 53 49 47 4e |) - 5;Up|t = SIGN|
|00001a90| 28 44 69 76 29 20 2b 20 | 31 3b 49 46 20 44 69 76 |(Div) + |1;IF Div|
|00001aa0| 20 3c 20 30 20 54 48 45 | 4e 20 44 69 76 20 3d 20 | < 0 THE|N Div = |
|00001ab0| 2d 44 69 76 3b 4f 43 6c | 6f 63 6b 20 3d 20 22 48 |-Div;OCl|ock = "H|
|00001ac0| 65 74 20 69 73 20 22 20 | 7c 7c 20 4e 79 2e 41 6c |et is " ||| Ny.Al|
|00001ad0| 6d 20 7c 7c 20 4d 6e 2e | 44 69 76 20 7c 7c 20 55 |m || Mn.|Div || U|
|00001ae0| 70 2e 55 70 74 20 7c 7c | 20 48 72 2e 48 72 73 3b |p.Upt ||| Hr.Hrs;|
|00001af0| 49 46 20 44 69 76 20 3d | 3d 20 30 20 54 48 45 4e |IF Div =|= 0 THEN|
|00001b00| 20 4f 43 6c 6f 63 6b 20 | 3d 20 4f 43 6c 6f 63 6b | OClock |= OClock|
|00001b10| 20 7c 7c 20 22 75 75 72 | 22 3b 53 41 59 20 27 27 | || "uur|";SAY ''|
|00001b20| 3b 53 41 59 20 27 27 4f | 43 6c 6f 63 6b 3b 53 41 |;SAY ''O|Clock;SA|
|00001b30| 59 20 27 27 3b 45 58 49 | 54 3b 41 42 4f 55 54 45 |Y '';EXI|T;ABOUTE|
|00001b40| 4c 49 54 45 3a 3b 53 41 | 59 20 27 27 3b 53 41 59 |LITE:;SA|Y '';SAY|
|00001b50| 20 49 54 41 4c 49 43 27 | 27 57 48 49 54 45 27 27 | ITALIC'|'WHITE''|
|00001b60| 42 4f 4c 44 27 20 20 20 | 20 20 20 37 34 31 6b 69 |BOLD'   |   741ki|
|00001b70| 4e 67 20 3c 31 30 3c 6b | 20 76 30 2e 39 20 27 50 |Ng <10<k| v0.9 'P|
|00001b80| 4c 41 49 4e 27 27 42 4f | 4c 44 27 20 a9 31 39 39 |LAIN''BO|LD' .199|
|00001b90| 36 20 66 55 24 69 30 6e | 20 44 33 24 69 47 6e 27 |6 fU$i0n| D3$iGn'|
|00001ba0| 50 4c 41 49 4e 3b 53 41 | 59 20 49 54 41 4c 49 43 |PLAIN;SA|Y ITALIC|
|00001bb0| 27 20 20 20 20 20 20 20 | 20 20 20 20 20 77 52 69 |'       |     wRi|
|00001bc0| 37 37 33 6e 20 62 59 3a | 20 33 64 57 61 52 64 20 |773n bY:| 3dWaRd |
|00001bd0| 46 61 52 72 30 77 27 50 | 4c 41 49 4e 3b 53 41 59 |FaRr0w'P|LAIN;SAY|
|00001be0| 20 27 27 3b 53 41 59 20 | 49 54 41 4c 49 43 27 20 | '';SAY |ITALIC' |
|00001bf0| 20 20 20 20 20 75 24 61 | 47 33 3a 20 20 27 50 4c |     u$a|G3:  'PL|
|00001c00| 41 49 4e 27 27 42 4f 4c | 44 27 54 43 6c 6f 63 6b |AIN''BOL|D'TClock|
|00001c10| 20 3c 6c 61 6e 67 75 61 | 67 65 7c 61 62 6f 75 74 | <langua|ge|about|
|00001c20| 3e 20 5b 65 6c 69 74 65 | 5d 27 50 4c 41 49 4e 3b |> [elite|]'PLAIN;|
|00001c30| 53 41 59 20 27 27 3b 53 | 41 59 20 42 4f 4c 44 27 |SAY '';S|AY BOLD'|
|00001c40| 31 61 4e 67 55 61 47 33 | 24 20 24 75 50 70 30 72 |1aNgUaG3|$ $uPp0r|
|00001c50| 37 33 64 3a 20 27 50 4c | 41 49 4e 27 27 49 54 41 |73d: 'PL|AIN''ITA|
|00001c60| 4c 49 43 27 33 6e 47 31 | 69 24 68 2c 20 24 77 33 |LIC'3nG1|i$h, $w3|
|00001c70| 64 69 24 68 2c 20 64 55 | 37 3c 68 2c 27 50 4c 41 |di$h, dU|7<h,'PLA|
|00001c80| 49 4e 3b 53 41 59 20 49 | 54 41 4c 49 43 27 20 20 |IN;SAY I|TALIC'  |
|00001c90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001ca0| 20 20 20 66 52 33 6e 3c | 48 2c 20 63 48 33 66 2c |   fR3n<|H, cH3f,|
|00001cb0| 20 67 69 42 62 33 52 69 | 24 68 27 50 4c 41 49 4e | giBb3Ri|$h'PLAIN|
|00001cc0| 3b 53 41 59 20 27 27 3b | 53 41 59 20 49 54 41 4c |;SAY '';|SAY ITAL|
|00001cd0| 49 43 27 27 57 48 49 54 | 45 27 27 42 4f 4c 44 27 |IC''WHIT|E''BOLD'|
|00001ce0| 20 20 20 20 37 68 33 20 | 27 53 51 27 65 6c 69 74 |    7h3 |'SQ'elit|
|00001cf0| 65 27 53 51 27 20 30 70 | 37 69 30 6e 20 57 30 72 |e'SQ' 0p|7i0n W0r|
|00001d00| 4b 24 20 57 69 37 68 20 | 41 6e 59 20 31 61 4e 67 |K$ Wi7h |AnY 1aNg|
|00001d10| 55 61 47 33 2e 27 50 4c | 41 49 4e 3b 53 41 59 20 |UaG3.'PL|AIN;SAY |
|00001d20| 27 27 3b 45 58 49 54 3b | 56 45 52 53 49 4f 4e 49 |'';EXIT;|VERSIONI|
|00001d30| 53 45 4c 49 54 45 3a 3b | 53 41 59 20 27 27 3b 53 |SELITE:;|SAY '';S|
|00001d40| 41 59 20 49 54 41 4c 49 | 43 27 37 68 33 20 3c 55 |AY ITALI|C'7h3 <U|
|00001d50| 72 52 33 6e 37 20 76 33 | 72 24 69 30 6e 20 30 46 |rR3n7 v3|r$i0n 0F|
|00001d60| 20 54 43 6c 6f 63 6b 20 | 69 24 3a 20 27 57 48 49 | TClock |i$: 'WHI|
|00001d70| 54 45 27 27 42 4f 4c 44 | 27 76 30 2e 39 20 27 50 |TE''BOLD|'v0.9 'P|
|00001d80| 4c 41 49 4e 3b 53 41 59 | 20 27 27 3b 45 58 49 54 |LAIN;SAY| '';EXIT|
|00001d90| 3b 45 4e 47 4c 49 53 48 | 45 4c 49 54 45 3a 3b 48 |;ENGLISH|ELITE:;H|
|00001da0| 72 2e 30 3d 27 37 77 33 | 31 76 33 20 27 3b 48 72 |r.0='7w3|1v3 ';Hr|
|00001db0| 2e 31 3d 27 30 6e 33 20 | 27 3b 48 72 2e 32 3d 27 |.1='0n3 |';Hr.2='|
|00001dc0| 37 77 30 20 27 3b 48 72 | 2e 33 3d 27 37 68 52 33 |7w0 ';Hr|.3='7hR3|
|00001dd0| 33 20 27 3b 48 72 2e 34 | 3d 27 66 30 75 52 20 27 |3 ';Hr.4|='f0uR '|
|00001de0| 3b 48 72 2e 35 3d 27 46 | 69 56 33 20 27 3b 48 72 |;Hr.5='F|iV3 ';Hr|
|00001df0| 2e 36 3d 27 24 69 58 20 | 27 3b 48 72 2e 37 3d 27 |.6='$iX |';Hr.7='|
|00001e00| 24 33 76 33 6e 20 27 3b | 48 72 2e 38 3d 27 33 69 |$3v3n ';|Hr.8='3i|
|00001e10| 47 68 37 20 27 3b 48 72 | 2e 39 3d 27 4e 69 4e 33 |Gh7 ';Hr|.9='NiN3|
|00001e20| 20 27 3b 48 72 2e 31 30 | 3d 27 37 33 6e 20 27 3b | ';Hr.10|='73n ';|
|00001e30| 48 72 2e 31 31 3d 27 33 | 31 33 76 33 6e 27 3b 4d |Hr.11='3|13v3n';M|
|00001e40| 6e 2e 30 3d 27 27 3b 4d | 6e 2e 31 3d 27 46 69 56 |n.0='';M|n.1='FiV|
|00001e50| 33 20 27 3b 4d 6e 2e 32 | 3d 27 37 33 6e 20 27 3b |3 ';Mn.2|='73n ';|
|00001e60| 4d 6e 2e 33 3d 27 61 20 | 51 75 41 72 37 33 72 20 |Mn.3='a |QuAr73r |
|00001e70| 27 3b 4d 6e 2e 34 3d 27 | 37 77 33 6e 37 79 20 27 |';Mn.4='|7w3n7y '|
|00001e80| 3b 4d 6e 2e 35 3d 27 37 | 77 33 6e 37 79 2d 46 69 |;Mn.5='7|w3n7y-Fi|
|00001e90| 56 33 20 27 3b 4d 6e 2e | 36 3d 27 48 61 31 66 20 |V3 ';Mn.|6='Ha1f |
|00001ea0| 27 3b 4e 79 2e 30 3d 27 | 4e 33 61 52 31 79 20 27 |';Ny.0='|N3aR1y '|
|00001eb0| 3b 4e 79 2e 31 3d 27 41 | 31 6d 30 24 37 20 27 3b |;Ny.1='A|1m0$7 ';|
|00001ec0| 4e 79 2e 32 3d 27 27 3b | 4e 79 2e 33 3d 27 4a 75 |Ny.2='';|Ny.3='Ju|
|00001ed0| 24 37 20 41 66 37 33 72 | 20 27 3b 4e 79 2e 34 3d |$7 Af73r| ';Ny.4=|
|00001ee0| 27 41 66 37 33 72 20 27 | 3b 55 70 2e 30 3d 27 37 |'Af73r '|;Up.0='7|
|00001ef0| 30 20 27 3b 55 70 2e 31 | 3d 27 27 3b 55 70 2e 32 |0 ';Up.1|='';Up.2|
|00001f00| 3d 27 70 41 24 37 20 27 | 3b 54 49 4d 45 5f 4e 4f |='pA$7 '|;TIME_NO|
|00001f10| 57 20 3d 20 28 54 49 4d | 45 28 27 53 27 29 20 2b |W = (TIM|E('S') +|
|00001f20| 20 31 36 35 30 29 20 25 | 20 36 30 3b 48 72 73 20 | 1650) %| 60;Hrs |
|00001f30| 3d 20 28 54 49 4d 45 5f | 4e 4f 57 20 25 20 36 30 |= (TIME_|NOW % 60|
|00001f40| 29 20 2f 2f 20 31 32 3b | 4d 69 6e 20 3d 20 54 49 |) // 12;|Min = TI|
|00001f50| 4d 45 5f 4e 4f 57 20 2f | 2f 20 36 30 3b 41 6c 6d |ME_NOW /|/ 60;Alm|
|00001f60| 20 3d 20 4d 69 6e 20 2f | 2f 20 35 3b 44 69 76 20 | = Min /|/ 5;Div |
|00001f70| 3d 20 28 4d 49 4e 20 25 | 20 35 29 20 2d 20 35 3b |= (MIN %| 5) - 5;|
|00001f80| 55 70 74 20 3d 20 53 49 | 47 4e 28 44 69 76 29 20 |Upt = SI|GN(Div) |
|00001f90| 2b 20 31 3b 49 46 20 44 | 69 76 20 3c 20 30 20 54 |+ 1;IF D|iv < 0 T|
|00001fa0| 48 45 4e 20 44 69 76 20 | 3d 20 2d 44 69 76 3b 4f |HEN Div |= -Div;O|
|00001fb0| 43 6c 6f 63 6b 20 3d 20 | 22 69 37 27 24 20 22 20 |Clock = |"i7'$ " |
|00001fc0| 7c 7c 20 4e 79 2e 41 6c | 6d 20 7c 7c 20 4d 6e 2e ||| Ny.Al|m || Mn.|
|00001fd0| 44 69 76 20 7c 7c 20 55 | 70 2e 55 70 74 20 7c 7c |Div || U|p.Upt |||
|00001fe0| 20 48 72 2e 48 72 73 3b | 49 46 20 44 69 76 20 3d | Hr.Hrs;|IF Div =|
|00001ff0| 3d 20 30 20 54 48 45 4e | 20 4f 43 6c 6f 63 6b 20 |= 0 THEN| OClock |
|00002000| 3d 20 4f 43 6c 6f 63 6b | 20 7c 7c 20 22 30 27 3c |= OClock| || "0'<|
|00002010| 31 30 3c 6b 22 3b 53 41 | 59 20 27 27 3b 53 41 59 |10<k";SA|Y '';SAY|
|00002020| 20 27 27 4f 43 6c 6f 63 | 6b 3b 53 41 59 20 27 27 | ''OCloc|k;SAY ''|
|00002030| 3b 45 58 49 54 3b 53 57 | 45 44 49 53 48 45 4c 49 |;EXIT;SW|EDISHELI|
|00002040| 54 45 3a 3b 48 72 2e 30 | 3d 27 37 30 31 76 20 27 |TE:;Hr.0|='701v '|
|00002050| 3b 48 72 2e 31 3d 27 33 | 37 37 20 27 3b 48 72 2e |;Hr.1='3|77 ';Hr.|
|00002060| 32 3d 27 37 76 27 41 42 | 27 20 27 3b 48 72 2e 33 |2='7v'AB|' ';Hr.3|
|00002070| 3d 27 37 72 33 20 27 3b | 48 72 2e 34 3d 27 66 59 |='7r3 ';|Hr.4='fY|
|00002080| 72 41 20 27 3b 48 72 2e | 35 3d 27 66 33 6d 20 27 |rA ';Hr.|5='f3m '|
|00002090| 3b 48 72 2e 36 3d 27 24 | 33 78 20 27 3b 48 72 2e |;Hr.6='$|3x ';Hr.|
|000020a0| 37 3d 27 24 6a 55 20 27 | 3b 48 72 2e 38 3d 27 27 |7='$jU '|;Hr.8=''|
|000020b0| 41 42 27 37 37 61 20 27 | 3b 48 72 2e 39 3d 27 4e |AB'77a '|;Hr.9='N|
|000020c0| 69 30 20 27 3b 48 72 2e | 31 30 3d 27 37 69 30 20 |i0 ';Hr.|10='7i0 |
|000020d0| 27 3b 48 72 2e 31 31 3d | 27 33 31 76 41 27 3b 4d |';Hr.11=|'31vA';M|
|000020e0| 6e 2e 30 3d 27 27 3b 4d | 6e 2e 31 3d 27 66 33 6d |n.0='';M|n.1='f3m|
|000020f0| 20 27 3b 4d 6e 2e 32 3d | 27 37 69 30 20 27 3b 4d | ';Mn.2=|'7i0 ';M|
|00002100| 6e 2e 33 3d 27 6b 56 61 | 52 37 20 27 3b 4d 6e 2e |n.3='kVa|R7 ';Mn.|
|00002110| 34 3d 27 37 6a 55 67 30 | 20 27 3b 4d 6e 2e 35 3d |4='7jUg0| ';Mn.5=|
|00002120| 27 37 6a 55 67 30 2d 66 | 33 6d 20 27 3b 4d 6e 2e |'7jUg0-f|3m ';Mn.|
|00002130| 36 3d 27 68 41 31 76 20 | 27 3b 4e 79 2e 30 3d 27 |6='hA1v |';Ny.0='|
|00002140| 6e 27 41 41 27 24 37 61 | 4e 20 27 3b 4e 79 2e 31 |n'AA'$7a|N ';Ny.1|
|00002150| 3d 27 4e 27 41 41 27 24 | 37 61 4e 20 27 3b 4e 79 |='N'AA'$|7aN ';Ny|
|00002160| 2e 32 3d 27 27 3b 4e 79 | 2e 33 3d 27 24 37 72 41 |.2='';Ny|.3='$7rA|
|00002170| 78 20 33 66 37 33 72 20 | 27 3b 4e 79 2e 34 3d 27 |x 3f73r |';Ny.4='|
|00002180| 33 66 37 33 72 20 27 3b | 55 70 2e 30 3d 27 69 20 |3f73r ';|Up.0='i |
|00002190| 27 3b 55 70 2e 31 3d 27 | 27 3b 55 70 2e 32 3d 27 |';Up.1='|';Up.2='|
|000021a0| 27 4f 41 27 76 33 72 20 | 27 3b 54 49 4d 45 5f 4e |'OA'v3r |';TIME_N|
|000021b0| 4f 57 20 3d 20 28 54 49 | 4d 45 28 27 53 27 29 20 |OW = (TI|ME('S') |
|000021c0| 2b 20 31 36 35 30 29 20 | 25 20 36 30 3b 48 72 73 |+ 1650) |% 60;Hrs|
|000021d0| 20 3d 20 28 54 49 4d 45 | 5f 4e 4f 57 20 25 20 36 | = (TIME|_NOW % 6|
|000021e0| 30 29 20 2f 2f 20 31 32 | 3b 4d 69 6e 20 3d 20 54 |0) // 12|;Min = T|
|000021f0| 49 4d 45 5f 4e 4f 57 20 | 2f 2f 20 36 30 3b 41 6c |IME_NOW |// 60;Al|
|00002200| 6d 20 3d 20 4d 69 6e 20 | 2f 2f 20 35 3b 44 69 76 |m = Min |// 5;Div|
|00002210| 20 3d 20 28 4d 49 4e 20 | 25 20 35 29 20 2d 20 35 | = (MIN |% 5) - 5|
|00002220| 3b 55 70 74 20 3d 20 53 | 49 47 4e 28 44 69 76 29 |;Upt = S|IGN(Div)|
|00002230| 20 2b 20 31 3b 49 46 20 | 44 69 76 20 3c 20 30 20 | + 1;IF |Div < 0 |
|00002240| 54 48 45 4e 20 44 69 76 | 20 3d 20 2d 44 69 76 0a |THEN Div| = -Div.|
|00002250| 4f 43 6c 6f 63 6b 20 3d | 20 22 6b 30 3c 6b 41 6e |OClock =| "k0<kAn|
|00002260| 20 22 41 41 22 52 20 22 | 20 7c 7c 20 4e 79 2e 41 | "AA"R "| || Ny.A|
|00002270| 6c 6d 20 7c 7c 20 4d 6e | 2e 44 69 76 20 7c 7c 20 |lm || Mn|.Div || |
|00002280| 55 70 2e 55 70 74 20 7c | 7c 20 48 72 2e 48 72 73 |Up.Upt ||| Hr.Hrs|
|00002290| 3b 49 46 20 44 69 76 20 | 3d 3d 20 30 20 54 48 45 |;IF Div |== 0 THE|
|000022a0| 4e 20 4f 43 6c 6f 63 6b | 20 3d 20 4f 43 6c 6f 63 |N OClock| = OCloc|
|000022b0| 6b 20 7c 7c 20 22 22 3b | 53 41 59 20 27 27 3b 53 |k || "";|SAY '';S|
|000022c0| 41 59 20 27 27 4f 43 6c | 6f 63 6b 3b 53 41 59 20 |AY ''OCl|ock;SAY |
|000022d0| 27 27 3b 45 58 49 54 3b | 46 52 45 4e 43 48 45 4c |'';EXIT;|FRENCHEL|
|000022e0| 49 54 45 3a 3b 48 72 2e | 30 3d 27 64 33 75 5a 33 |ITE:;Hr.|0='d3uZ3|
|000022f0| 20 27 3b 48 72 2e 31 3d | 27 75 4e 20 27 3b 48 72 | ';Hr.1=|'uN ';Hr|
|00002300| 2e 32 3d 27 44 33 75 58 | 20 27 3b 48 72 2e 33 3d |.2='D3uX| ';Hr.3=|
|00002310| 27 37 72 30 69 24 20 27 | 3b 48 72 2e 34 3d 27 71 |'7r0i$ '|;Hr.4='q|
|00002320| 55 61 37 72 33 20 27 3b | 48 72 2e 35 3d 27 3c 69 |Ua7r3 ';|Hr.5='<i|
|00002330| 4e 71 20 27 3b 48 72 2e | 36 3d 27 24 69 58 20 27 |Nq ';Hr.|6='$iX '|
|00002340| 3b 48 72 2e 37 3d 27 24 | 33 70 37 20 27 3b 48 72 |;Hr.7='$|3p7 ';Hr|
|00002350| 2e 38 3d 27 68 55 69 37 | 20 27 3b 48 72 2e 39 3d |.8='hUi7| ';Hr.9=|
|00002360| 27 4e 33 75 46 20 27 3b | 48 72 2e 31 30 3d 27 44 |'N3uF ';|Hr.10='D|
|00002370| 69 58 20 27 3b 48 72 2e | 31 31 3d 27 30 6e 5a 33 |iX ';Hr.|11='0nZ3|
|00002380| 20 27 3b 4d 6e 2e 30 3d | 27 27 3b 4d 6e 2e 31 3d | ';Mn.0=|'';Mn.1=|
|00002390| 27 3c 69 4e 71 20 27 3b | 4d 6e 2e 32 3d 27 44 69 |'<iNq ';|Mn.2='Di|
|000023a0| 58 20 27 3b 4d 6e 2e 33 | 3d 27 31 33 20 71 55 61 |X ';Mn.3|='13 qUa|
|000023b0| 52 37 20 27 3b 4d 6e 2e | 34 3d 27 56 69 4e 67 37 |R7 ';Mn.|4='ViNg7|
|000023c0| 20 27 3b 4d 6e 2e 35 3d | 27 56 69 4e 67 37 2d 3c | ';Mn.5=|'ViNg7-<|
|000023d0| 69 4e 71 20 27 3b 4d 6e | 2e 36 3d 27 64 33 4d 69 |iNq ';Mn|.6='d3Mi|
|000023e0| 20 27 3b 4e 79 2e 30 3d | 27 70 52 27 45 45 27 24 | ';Ny.0=|'pR'EE'$|
|000023f0| 20 64 33 20 27 3b 4e 79 | 2e 31 3d 27 70 52 27 45 | d3 ';Ny|.1='pR'E|
|00002400| 45 27 24 20 64 33 20 27 | 3b 4e 79 2e 32 3d 27 27 |E'$ d3 '|;Ny.2=''|
|00002410| 3b 4e 79 2e 33 3d 27 61 | 50 72 27 45 45 27 24 20 |;Ny.3='a|Pr'EE'$ |
|00002420| 27 3b 4e 79 2e 34 3d 27 | 61 50 72 27 45 45 27 24 |';Ny.4='|aPr'EE'$|
|00002430| 20 27 3b 55 70 2e 30 3d | 27 27 41 42 27 20 27 3b | ';Up.0=|''AB' ';|
|00002440| 55 70 2e 31 3d 27 27 3b | 55 70 2e 32 3d 27 50 61 |Up.1='';|Up.2='Pa|
|00002450| 24 24 27 45 45 27 20 27 | 3b 54 49 4d 45 5f 4e 4f |$$'EE' '|;TIME_NO|
|00002460| 57 20 3d 20 28 54 49 4d | 45 28 27 53 27 29 20 2b |W = (TIM|E('S') +|
|00002470| 20 31 36 35 30 29 20 25 | 20 36 30 3b 48 72 73 20 | 1650) %| 60;Hrs |
|00002480| 3d 20 28 54 49 4d 45 5f | 4e 4f 57 20 25 20 36 30 |= (TIME_|NOW % 60|
|00002490| 29 20 2f 2f 20 31 32 3b | 4d 69 6e 20 3d 20 54 49 |) // 12;|Min = TI|
|000024a0| 4d 45 5f 4e 4f 57 20 2f | 2f 20 36 30 3b 41 6c 6d |ME_NOW /|/ 60;Alm|
|000024b0| 20 3d 20 4d 69 6e 20 2f | 2f 20 35 3b 44 69 76 20 | = Min /|/ 5;Div |
|000024c0| 3d 20 28 4d 49 4e 20 25 | 20 35 29 20 2d 20 35 3b |= (MIN %| 5) - 5;|
|000024d0| 55 70 74 20 3d 20 53 49 | 47 4e 28 44 69 76 29 20 |Upt = SI|GN(Div) |
|000024e0| 2b 20 31 3b 49 46 20 44 | 69 76 20 3c 20 30 20 54 |+ 1;IF D|iv < 0 T|
|000024f0| 48 45 4e 20 44 69 76 20 | 3d 20 2d 44 69 76 3b 4f |HEN Div |= -Div;O|
|00002500| 43 6c 6f 63 6b 20 3d 20 | 22 c7 27 33 24 37 20 22 |Clock = |".'3$7 "|
|00002510| 20 7c 7c 20 4e 79 2e 41 | 6c 6d 20 7c 7c 20 4d 6e | || Ny.A|lm || Mn|
|00002520| 2e 44 69 76 20 7c 7c 20 | 55 70 2e 55 70 74 20 7c |.Div || |Up.Upt ||
|00002530| 7c 20 48 72 2e 48 72 73 | 3b 49 46 20 44 69 76 20 || Hr.Hrs|;IF Div |
|00002540| 3d 3d 20 30 20 54 48 45 | 4e 20 4f 43 6c 6f 63 6b |== 0 THE|N OClock|
|00002550| 20 3d 20 4f 43 6c 6f 63 | 6b 20 7c 7c 20 22 68 33 | = OCloc|k || "h3|
|00002560| 75 52 24 22 3b 53 41 59 | 20 27 27 3b 53 41 59 20 |uR$";SAY| '';SAY |
|00002570| 27 27 4f 43 6c 6f 63 6b | 3b 53 41 59 20 27 27 3b |''OClock|;SAY '';|
|00002580| 45 58 49 54 3b 47 49 42 | 42 45 52 49 53 48 45 4c |EXIT;GIB|BERISHEL|
|00002590| 49 54 45 3a 3b 48 72 2e | 30 3d 27 37 77 41 76 41 |ITE:;Hr.|0='7wAvA|
|000025a0| 67 33 31 76 20 27 3b 48 | 72 2e 31 3d 27 77 55 76 |g31v ';H|r.1='wUv|
|000025b0| 41 67 30 6e 33 20 27 3b | 48 72 2e 32 3d 27 37 76 |Ag0n3 ';|Hr.2='7v|
|000025c0| 41 67 30 30 20 27 3b 48 | 72 2e 33 3d 27 37 68 56 |Ag00 ';H|r.3='7hV|
|000025d0| 61 47 33 33 20 27 3b 48 | 72 2e 34 3d 27 66 56 61 |aG33 ';H|r.4='fVa|
|000025e0| 47 30 72 20 27 3b 48 72 | 2e 35 3d 27 66 56 61 47 |G0r ';Hr|.5='fVaG|
|000025f0| 69 56 65 20 27 3b 48 72 | 2e 36 3d 27 24 76 41 67 |iVe ';Hr|.6='$vAg|
|00002600| 49 78 20 27 3b 48 72 2e | 37 3d 27 24 33 76 41 67 |Ix ';Hr.|7='$3vAg|
|00002610| 33 76 33 6e 20 27 3b 48 | 72 2e 38 3d 27 33 76 41 |3v3n ';H|r.8='3vA|
|00002620| 67 41 37 33 20 27 3b 48 | 72 2e 39 3d 27 4e 69 56 |gA73 ';H|r.9='NiV|
|00002630| 61 47 69 4e 33 20 27 3b | 48 72 2e 31 30 3d 27 37 |aGiN3 ';|Hr.10='7|
|00002640| 76 41 67 33 6e 20 27 3b | 48 72 2e 31 31 3d 27 33 |vAg3n ';|Hr.11='3|
|00002650| 31 33 76 41 67 33 6e 20 | 27 3b 4d 6e 2e 30 3d 27 |13vAg3n |';Mn.0='|
|00002660| 27 3b 4d 6e 2e 31 3d 27 | 66 56 61 47 69 56 33 20 |';Mn.1='|fVaGiV3 |
|00002670| 27 3b 4d 6e 2e 32 3d 27 | 37 76 41 67 33 6e 20 27 |';Mn.2='|7vAg3n '|
|00002680| 3b 4d 6e 2e 33 3d 27 41 | 76 41 67 41 20 51 75 41 |;Mn.3='A|vAgA QuA|
|00002690| 76 47 30 72 37 61 20 27 | 3b 4d 6e 2e 34 3d 27 37 |vG0r7a '|;Mn.4='7|
|000026a0| 57 33 76 41 67 33 6e 37 | 79 20 27 3b 4d 6e 2e 35 |W3vAg3n7|y ';Mn.5|
|000026b0| 3d 27 37 77 33 76 41 67 | 33 6e 37 79 2d 66 56 61 |='7w3vAg|3n7y-fVa|
|000026c0| 47 69 56 33 20 27 3b 4d | 6e 2e 36 3d 27 68 56 61 |GiV3 ';M|n.6='hVa|
|000026d0| 31 66 20 27 3b 4e 79 2e | 30 3d 27 4e 76 41 67 33 |1f ';Ny.|0='NvAg3|
|000026e0| 61 52 31 79 20 27 3b 4e | 79 2e 31 3d 27 41 76 41 |aR1y ';N|y.1='AvA|
|000026f0| 67 30 31 6d 56 61 47 30 | 24 37 20 27 3b 4e 79 2e |g01mVaG0|$7 ';Ny.|
|00002700| 32 3d 27 27 3b 4e 79 2e | 33 3d 27 4a 76 47 75 24 |2='';Ny.|3='JvGu$|
|00002710| 37 20 41 76 41 67 41 37 | 33 72 20 27 3b 4e 79 2e |7 AvAgA7|3r ';Ny.|
|00002720| 34 3d 27 41 76 41 67 41 | 37 33 72 20 27 3b 55 70 |4='AvAgA|73r ';Up|
|00002730| 2e 30 3d 27 37 76 41 67 | 30 20 27 3b 55 70 2e 31 |.0='7vAg|0 ';Up.1|
|00002740| 3d 27 27 3b 55 70 2e 32 | 3d 27 70 56 61 47 61 24 |='';Up.2|='pVaGa$|
|00002750| 37 20 27 3b 54 49 4d 45 | 5f 4e 4f 57 20 3d 20 28 |7 ';TIME|_NOW = (|
|00002760| 54 49 4d 45 28 27 53 27 | 29 20 2b 20 31 36 35 30 |TIME('S'|) + 1650|
|00002770| 29 20 25 20 36 30 3b 48 | 72 73 20 3d 20 28 54 49 |) % 60;H|rs = (TI|
|00002780| 4d 45 5f 4e 4f 57 20 25 | 20 36 30 29 20 2f 2f 20 |ME_NOW %| 60) // |
|00002790| 31 32 3b 4d 69 6e 20 3d | 20 54 49 4d 45 5f 4e 4f |12;Min =| TIME_NO|
|000027a0| 57 20 2f 2f 20 36 30 3b | 41 6c 6d 20 3d 20 4d 69 |W // 60;|Alm = Mi|
|000027b0| 6e 20 2f 2f 20 35 3b 44 | 69 76 20 3d 20 28 4d 49 |n // 5;D|iv = (MI|
|000027c0| 4e 20 25 20 35 29 20 2d | 20 35 3b 55 70 74 20 3d |N % 5) -| 5;Upt =|
|000027d0| 20 53 49 47 4e 28 44 69 | 76 29 20 2b 20 31 3b 49 | SIGN(Di|v) + 1;I|
|000027e0| 46 20 44 69 76 20 3c 20 | 30 20 54 48 45 4e 20 44 |F Div < |0 THEN D|
|000027f0| 69 76 20 3d 20 2d 44 69 | 76 3b 4f 43 6c 6f 63 6b |iv = -Di|v;OClock|
|00002800| 20 3d 20 22 69 56 61 47 | 69 37 24 20 22 20 7c 7c | = "iVaG|i7$ " |||
|00002810| 20 4e 79 2e 41 6c 6d 20 | 7c 7c 20 4d 6e 2e 44 69 | Ny.Alm ||| Mn.Di|
|00002820| 76 20 7c 7c 20 55 70 2e | 55 70 74 20 7c 7c 20 48 |v || Up.|Upt || H|
|00002830| 72 2e 48 72 73 3b 49 46 | 20 44 69 76 20 3d 3d 20 |r.Hrs;IF| Div == |
|00002840| 30 20 54 48 45 4e 20 4f | 43 6c 6f 63 6b 20 3d 20 |0 THEN O|Clock = |
|00002850| 4f 43 6c 6f 63 6b 20 7c | 7c 20 22 30 76 41 67 30 |OClock ||| "0vAg0|
|00002860| 27 3c 31 30 76 41 67 30 | 6b 22 3b 53 41 59 20 27 |'<10vAg0|k";SAY '|
|00002870| 27 3b 53 41 59 20 27 27 | 4f 43 6c 6f 63 6b 3b 53 |';SAY ''|OClock;S|
|00002880| 41 59 20 27 27 3b 45 58 | 49 54 3b 43 48 45 46 45 |AY '';EX|IT;CHEFE|
|00002890| 4c 49 54 45 3a 3b 48 72 | 2e 30 3d 27 37 77 33 31 |LITE:;Hr|.0='7w31|
|000028a0| 76 30 20 27 3b 48 72 2e | 31 3d 27 30 6e 33 30 20 |v0 ';Hr.|1='0n30 |
|000028b0| 27 3b 48 72 2e 32 3d 27 | 37 77 30 77 30 20 27 3b |';Hr.2='|7w0w0 ';|
|000028c0| 48 72 2e 33 3d 27 37 68 | 52 33 30 20 27 3b 48 72 |Hr.3='7h|R30 ';Hr|
|000028d0| 2e 34 3d 27 46 30 75 52 | 30 20 27 3b 48 72 2e 35 |.4='F0uR|0 ';Hr.5|
|000028e0| 3d 27 66 69 56 30 20 27 | 3b 48 72 2e 36 3d 27 24 |='fiV0 '|;Hr.6='$|
|000028f0| 69 58 30 20 27 3b 48 72 | 2e 37 3d 27 24 33 76 33 |iX0 ';Hr|.7='$3v3|
|00002900| 6e 30 20 27 3b 48 72 2e | 38 3d 27 33 69 47 68 37 |n0 ';Hr.|8='3iGh7|
|00002910| 30 20 27 3b 48 72 2e 39 | 3d 27 4e 69 4e 33 30 20 |0 ';Hr.9|='NiN30 |
|00002920| 27 3b 48 72 2e 31 30 3d | 27 37 33 6e 30 20 27 3b |';Hr.10=|'73n0 ';|
|00002930| 48 72 2e 31 31 3d 27 33 | 31 33 76 33 6e 30 20 27 |Hr.11='3|13v3n0 '|
|00002940| 3b 4d 6e 2e 30 3d 27 27 | 3b 4d 6e 2e 31 3d 27 66 |;Mn.0=''|;Mn.1='f|
|00002950| 69 56 33 30 20 27 3b 4d | 6e 2e 32 3d 27 37 33 6e |iV30 ';M|n.2='73n|
|00002960| 30 20 27 3b 4d 6e 2e 33 | 3d 27 61 30 20 71 55 61 |0 ';Mn.3|='a0 qUa|
|00002970| 52 37 30 20 27 3b 4d 6e | 2e 34 3d 27 37 77 33 6e |R70 ';Mn|.4='7w3n|
|00002980| 37 79 30 20 27 3b 4d 6e | 2e 35 3d 27 37 77 33 6e |7y0 ';Mn|.5='7w3n|
|00002990| 37 79 30 2d 66 69 56 30 | 20 27 3b 4d 6e 2e 36 3d |7y0-fiV0| ';Mn.6=|
|000029a0| 27 68 41 31 66 30 20 27 | 3b 4e 79 2e 30 3d 27 6e |'hA1f0 '|;Ny.0='n|
|000029b0| 33 61 52 31 79 30 20 27 | 3b 4e 79 2e 31 3d 27 61 |3aR1y0 '|;Ny.1='a|
|000029c0| 31 6d 30 24 37 30 20 27 | 3b 4e 79 2e 32 3d 27 27 |1m0$70 '|;Ny.2=''|
|000029d0| 3b 4e 79 2e 33 3d 27 6a | 55 24 37 30 20 61 46 37 |;Ny.3='j|U$70 aF7|
|000029e0| 33 72 30 20 27 3b 4e 79 | 2e 34 3d 27 41 66 37 33 |3r0 ';Ny|.4='Af73|
|000029f0| 72 30 20 27 3b 55 70 2e | 30 3d 27 37 30 79 30 20 |r0 ';Up.|0='70y0 |
|00002a00| 27 3b 55 70 2e 31 3d 27 | 27 3b 55 70 2e 32 3d 27 |';Up.1='|';Up.2='|
|00002a10| 70 41 24 37 30 20 27 3b | 54 49 4d 45 5f 4e 4f 57 |pA$70 ';|TIME_NOW|
|00002a20| 20 3d 20 28 54 49 4d 45 | 28 27 53 27 29 20 2b 20 | = (TIME|('S') + |
|00002a30| 31 36 35 30 29 20 25 20 | 36 30 3b 48 72 73 20 3d |1650) % |60;Hrs =|
|00002a40| 20 28 54 49 4d 45 5f 4e | 4f 57 20 25 20 36 30 29 | (TIME_N|OW % 60)|
|00002a50| 20 2f 2f 20 31 32 3b 4d | 69 6e 20 3d 20 54 49 4d | // 12;M|in = TIM|
|00002a60| 45 5f 4e 4f 57 20 2f 2f | 20 36 30 3b 41 6c 6d 20 |E_NOW //| 60;Alm |
|00002a70| 3d 20 4d 69 6e 20 2f 2f | 20 35 3b 44 69 76 20 3d |= Min //| 5;Div =|
|00002a80| 20 28 4d 49 4e 20 25 20 | 35 29 20 2d 20 35 3b 55 | (MIN % |5) - 5;U|
|00002a90| 70 74 20 3d 20 53 49 47 | 4e 28 44 69 76 29 20 2b |pt = SIG|N(Div) +|
|00002aa0| 20 31 3b 49 46 20 44 69 | 76 20 3c 20 30 20 54 48 | 1;IF Di|v < 0 TH|
|00002ab0| 45 4e 20 44 69 76 20 3d | 20 2d 44 69 76 3b 4f 43 |EN Div =| -Div;OC|
|00002ac0| 6c 6f 63 6b 20 3d 20 22 | 33 66 46 20 33 66 46 20 |lock = "|3fF 3fF |
|00002ad0| 33 66 46 20 69 37 24 30 | 20 22 20 7c 7c 20 4e 79 |3fF i7$0| " || Ny|
|00002ae0| 2e 41 6c 6d 20 7c 7c 20 | 4d 6e 2e 44 69 76 20 7c |.Alm || |Mn.Div ||
|00002af0| 7c 20 55 70 2e 55 70 74 | 20 7c 7c 20 48 72 2e 48 || Up.Upt| || Hr.H|
|00002b00| 72 73 3b 49 46 20 44 69 | 76 20 3d 3d 20 30 20 54 |rs;IF Di|v == 0 T|
|00002b10| 48 45 4e 20 4f 43 6c 6f | 63 6b 20 3d 20 4f 43 6c |HEN OClo|ck = OCl|
|00002b20| 6f 63 6b 20 7c 7c 20 22 | 30 27 3c 31 30 3c 6b 30 |ock || "|0'<10<k0|
|00002b30| 22 3b 53 41 59 20 27 27 | 3b 53 41 59 20 27 27 4f |";SAY ''|;SAY ''O|
|00002b40| 43 6c 6f 63 6b 3b 53 41 | 59 20 27 27 3b 45 58 49 |Clock;SA|Y '';EXI|
|00002b50| 54 3b 44 55 54 43 48 45 | 4c 49 54 45 3a 3b 48 72 |T;DUTCHE|LITE:;Hr|
|00002b60| 2e 30 3d 27 37 77 41 61 | 31 66 20 27 3b 48 72 2e |.0='7wAa|1f ';Hr.|
|00002b70| 31 3d 27 33 33 6e 20 27 | 3b 48 72 2e 32 3d 27 37 |1='33n '|;Hr.2='7|
|00002b80| 77 33 33 20 27 3b 48 72 | 2e 33 3d 27 64 52 69 33 |w33 ';Hr|.3='dRi3|
|00002b90| 20 27 3b 48 72 2e 34 3d | 27 56 69 33 72 20 27 3b | ';Hr.4=|'Vi3r ';|
|00002ba0| 48 72 2e 35 3d 27 56 69 | 4a 66 20 27 3b 48 72 2e |Hr.5='Vi|Jf ';Hr.|
|00002bb0| 36 3d 27 5a 33 24 20 27 | 3b 48 72 2e 37 3d 27 5a |6='Z3$ '|;Hr.7='Z|
|00002bc0| 33 76 33 6e 20 27 3b 48 | 72 2e 38 3d 27 61 3c 68 |3v3n ';H|r.8='a<h|
|00002bd0| 37 20 27 3b 48 72 2e 39 | 3d 27 4e 33 67 33 6e 20 |7 ';Hr.9|='N3g3n |
|00002be0| 27 3b 48 72 2e 31 30 3d | 27 37 33 6e 20 27 3b 48 |';Hr.10=|'73n ';H|
|00002bf0| 72 2e 31 31 3d 27 33 31 | 66 20 27 3b 4d 6e 2e 30 |r.11='31|f ';Mn.0|
|00002c00| 3d 27 27 3b 4d 6e 2e 31 | 3d 27 56 69 4a 66 20 27 |='';Mn.1|='ViJf '|
|00002c10| 3b 4d 6e 2e 32 3d 27 37 | 33 6e 20 27 3b 4d 6e 2e |;Mn.2='7|3n ';Mn.|
|00002c20| 33 3d 27 4b 77 41 72 37 | 69 33 72 20 27 3b 4d 6e |3='KwAr7|i3r ';Mn|
|00002c30| 2e 34 3d 27 37 57 69 4e | 37 69 47 20 27 3b 4d 6e |.4='7WiN|7iG ';Mn|
|00002c40| 2e 35 3d 27 56 69 4a 66 | 33 6e 2d 37 77 49 6e 37 |.5='ViJf|3n-7wIn7|
|00002c50| 69 47 20 27 3b 4d 6e 2e | 36 3d 27 48 61 31 66 20 |iG ';Mn.|6='Ha1f |
|00002c60| 27 3b 4e 79 2e 30 3d 27 | 42 69 4a 6e 41 20 27 3b |';Ny.0='|BiJnA ';|
|00002c70| 4e 79 2e 31 3d 27 42 69 | 4a 6e 41 20 27 3b 4e 79 |Ny.1='Bi|JnA ';Ny|
|00002c80| 2e 32 3d 27 27 3b 4e 79 | 2e 33 3d 27 4e 33 37 20 |.2='';Ny|.3='N37 |
|00002c90| 33 72 4e 61 20 27 3b 4e | 79 2e 34 3d 27 33 72 4e |3rNa ';N|y.4='3rN|
|00002ca0| 61 20 27 3b 55 70 2e 30 | 3d 27 76 30 30 72 20 27 |a ';Up.0|='v00r '|
|00002cb0| 3b 55 70 2e 31 3d 27 27 | 3b 55 70 2e 32 3d 27 6e |;Up.1=''|;Up.2='n|
|00002cc0| 41 20 27 3b 54 49 4d 45 | 5f 4e 4f 57 20 3d 20 28 |A ';TIME|_NOW = (|
|00002cd0| 54 49 4d 45 28 27 53 27 | 29 20 2b 20 31 36 35 30 |TIME('S'|) + 1650|
|00002ce0| 29 20 25 20 36 30 3b 48 | 72 73 20 3d 20 28 54 49 |) % 60;H|rs = (TI|
|00002cf0| 4d 45 5f 4e 4f 57 20 25 | 20 36 30 29 20 2f 2f 20 |ME_NOW %| 60) // |
|00002d00| 31 32 3b 4d 69 6e 20 3d | 20 54 49 4d 45 5f 4e 4f |12;Min =| TIME_NO|
|00002d10| 57 20 2f 2f 20 36 30 3b | 41 6c 6d 20 3d 20 4d 69 |W // 60;|Alm = Mi|
|00002d20| 6e 20 2f 2f 20 35 3b 44 | 69 76 20 3d 20 28 4d 49 |n // 5;D|iv = (MI|
|00002d30| 4e 20 25 20 35 29 20 2d | 20 35 3b 55 70 74 20 3d |N % 5) -| 5;Upt =|
|00002d40| 20 53 49 47 4e 28 44 69 | 76 29 20 2b 20 31 3b 49 | SIGN(Di|v) + 1;I|
|00002d50| 46 20 44 69 76 20 3c 20 | 30 20 54 48 45 4e 20 44 |F Div < |0 THEN D|
|00002d60| 69 76 20 3d 20 2d 44 69 | 76 3b 4f 43 6c 6f 63 6b |iv = -Di|v;OClock|
|00002d70| 20 3d 20 22 48 33 37 20 | 69 24 20 22 20 7c 7c 20 | = "H37 |i$ " || |
|00002d80| 4e 79 2e 41 6c 6d 20 7c | 7c 20 4d 6e 2e 44 69 76 |Ny.Alm ||| Mn.Div|
|00002d90| 20 7c 7c 20 55 70 2e 55 | 70 74 20 7c 7c 20 48 72 | || Up.U|pt || Hr|
|00002da0| 2e 48 72 73 3b 49 46 20 | 44 69 76 20 3d 3d 20 30 |.Hrs;IF |Div == 0|
|00002db0| 20 54 48 45 4e 20 4f 43 | 6c 6f 63 6b 20 3d 20 4f | THEN OC|lock = O|
|00002dc0| 43 6c 6f 63 6b 20 7c 7c | 20 22 75 55 72 22 3b 53 |Clock ||| "uUr";S|
|00002dd0| 41 59 20 27 27 3b 53 41 | 59 20 27 27 4f 43 6c 6f |AY '';SA|Y ''OClo|
|00002de0| 63 6b 3b 53 41 59 20 27 | 27 3b 45 58 49 54 0a 2f |ck;SAY '|';EXIT./|
|00002df0| 2a 20 4f 72 69 67 69 6e | 61 6c 20 73 63 72 69 70 |* Origin|al scrip|
|00002e00| 74 3a 20 34 34 37 20 6c | 69 6e 65 73 2c 20 31 33 |t: 447 l|ines, 13|
|00002e10| 37 30 39 20 62 79 74 65 | 73 20 2a 2f 0a 00 00 00 |709 byte|s */....|
|00002e20| 00 00 03 f2             |                         |....    |        |
+--------+-------------------------+-------------------------+--------+--------+